Se você deseja ser atualizado automaticamente no dia da semana de hoje, este artigo é para você. Este artigo se concentra em atualizar o usuário no dia da semana atual por meio do msgbox no vba.
Pergunta): Quero um código para determinar o dia da semana.
Precisamos seguir as etapas abaixo para lançar o editor VB
- Clique na guia Desenvolvedor
- No grupo Código, selecione Visual Basic
- Clique em Inserir e depois em Módulo
- Isso criará um novo módulo
- Insira o seguinte código no Módulo
Sub TodaysDay ()
Selecione Case DatePart ("w", Date, vbMonday)
Caso 1
MsgBox "Mon"
Caso 2
MsgBox "Tue"
Caso 3
MsgBox "Quarta"
Caso 4
MsgBox "Qui"
Caso 5
MsgBox "Sex"
Caso 6
MsgBox "Sat"
Caso 7
MsgBox "Sun"
End Select
End Sub
Observação: A data de hoje é 5 de junho de 2015, ou seja, sexta-feira
“VbMonday” é usado para retornar segunda-feira como o primeiro dia da semana; caso o domingo seja o primeiro dia da semana, você precisa usar “VbSunday”
- Pressione a tecla de atalho ALT + F8 para abrir a janela Macro
- Selecione a macro que você acabou de criar
- Clique em Executar e obteremos o nome da data de hoje.
- Se você quiser mudar o formato de Sex para Sexta
- Você precisa fazer pequenas alterações no código
Sub TodaysDay ()
Selecione Case DatePart ("w", Date, vbMonday)
Caso 1
MsgBox "segunda-feira"
Caso 2
MsgBox "terça-feira"
Caso 3
MsgBox "quarta-feira"
Caso 4
MsgBox "quinta-feira"
Caso 5
MsgBox "sexta-feira"
Caso 6
MsgBox "sábado"
Caso 7
MsgBox "Domingo"
End Select
End Sub
- Desta vez, você poderá exibir o nome completo do dia.
Nesse caso, podemos usar a caixa de mensagem do VBA para notificar o usuário sobre o dia da semana atual.
