Excel No VBA apresentar mensagens conforme o dia da semana

[GENECIOFICIAL]

Boa tarde! 

Anteriormente solicitei a resposta via fórmula, fui atendido.  Porém com a inclusão de dados a resposta ficou inviável.

Conforme o arquivo anexo solicito a sua ajuda.

 

Grato.

VBA CONFORME O DIA DA SEMANA APRESENTAR O NOME DO PROFESSOR - PERG.xlsx

[Basole]

@GENECIOFICIAL veja se é isso

 

 

VBA CONFORME O DIA DA SEMANA APRESENTAR O NOME DO PROFESSOR - PERG.zip

[GENECIOFICIAL]

Boa tarde!

Muito obrigado por atender a minha solicitação, baixei a planilha e não encontrei o resultado esperado, acredito que devido o dia ser o sábado ou domingo nada ocorreu.

Se possível alterar o código VBA, para apresentar a mensagem aos sábados e domingos. " Sábados e domingos estão fora da consulta.

 

Grato.

[GENECIOFICIAL]

Boa tarde! Realmente não funcionou.

 

Grato.

[Basole]

Segue com as alterações

 

 

VBA CONFORME O DIA DA SEMANA APRESENTAR O NOME DO PROFESSOR - PERG.zip

[GENECIOFICIAL]

Bom dia! Basole

 

Testes efetuados em duas computadores diferentes.

Ao abrir o arquivo, recebo a informação que as macros estão desabilitadas, mesmo habilitando as macros, não mostra as mensagens conforme o dia da sema, também não consigo encontrar as macros para obter o resultado.

O objetivo é ao abrir o arquivo, apresentar de imediato as mensagens do dia.

 

Por favor pode verificar o ocorrido.

 

Grato.

 

[GENECIOFICIAL]

Em 11/10/2022 às 10:19, GENECIOFICIAL disse:

Bom dia! Basole

 

Testes efetuados em duas computadores diferentes.

Ao abrir o arquivo, recebo a informação que as macros estão desabilitadas, mesmo habilitando as macros, não mostra as mensagens conforme o dia da sema, também não consigo encontrar as macros para obter o resultado.

O objetivo é ao abrir o arquivo, apresentar de imediato as mensagens do dia.

 

Por favor pode verificar o ocorrido.

 

Grato.

 

Bom dia!

Permanece o problema.

 

[Midori]

Aqui a macro do @Basole funcionou.

 

Verifique se as macros estão mesmo habilitadas... Faça uma sub com uma Msgbox só para testar.

[Scofieldgyn]

@GENECIOFICIAL baixei aqui a solução dele está funcionando normalmente, veja que na célula E1 tem um controle de lista, lá você escolhe o dia da semana que automaticamente vai mostrar os dados conforme havia pedido.

 

Caso não queira por controle de lista, nesta mesma célula, limpe a configuração de lista e coloque a fórmula abaixo.

 

=TEXTO(HOJE();"dddd")

 

Pra limpar a lista, vá em Dados, depois validação de dados e coloque pra limpar tudo.

[GENECIOFICIAL]

Bom dia!

Por favor, alguém pode disponibilizar o arquivo que o BASOLE elaborou as macros.

Na validação de dados, não consigo limpar a restrição da célula E2.

 

Disponibilizo o arquivo com a solução que em hipótese alguma não funcionou com office 2016.

 

Grato.

VBA CONFORME O DIA DA SEMANA - RESP BASOLE.zip

[Scofieldgyn]

@GENECIOFICIAL

segue o anexo do @Basole

Meu office também é o 2016 e funcionando normalmente. Veja se suas macros está habilitadas.

VBA CONFORME O DIA DA SEMANA APRESENTAR O NOME DO PROFESSOR - PERG (1).zip

[GENECIOFICIAL]

Em 19/10/2022 às 08:06, Scofieldgyn disse:

@GENECIOFICIAL

segue o anexo do @Basole

Meu office também é o 2016 e funcionando normalmente. Veja se suas macros está habilitadas.

VBA CONFORME O DIA DA SEMANA APRESENTAR O NOME DO PROFESSOR - PERG (1).zip 18 kB · 3 downloads

Bom dia!  Após atualização do windows 10 e do office 2016m, o problema foi resolvido.

 

Grato.