Instrução Date
Define a data do sistema atual.
Sintaxe
Data=Data
Para sistemas que executam o Microsoft Windows 95, a especificação de data necessária deve ser uma data de 1º de janeiro de 1980 até 31 de dezembro de 2099. Para sistemas que executam o Microsoft Windows NT, a data deve ser uma data de 1º de janeiro de 1980 até 31 de dezembro de 2079. Para o Macintosh, a data deve ser uma data de 1º de janeiro de 1904 até 5 de fevereiro de 2040.
Exemplo
Este exemplo usa a instrução Date para definir a data do sistema do computador. No ambiente de desenvolvimento, o literal de data é exibido em formato de data curta usando as configurações de localidade do código.
Dim MyDate
MyDate = #February 12, 1985# ' Assign a date.
Date= MyDate ' Change system date.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.