Range.InsertDateTime (Word)

Insere a data ou hora atual, ou ambas, seja como texto ou como um campo TIME.

InsertDateTime (DateTimeFormat, InsertAsField, InsertAsFullWidth, DateLanguage, CalendarType)

With ActiveDocument.Content 
 .Collapse Direction:=wdCollapseEnd 
 .InsertDateTime DateTimeFormat:="MM/dd/yy", _ 
 InsertAsField:=False 
End With

Arguments

Optional arguments

Os seguintes argumentos são opcionais

DateTimeFormat (String) - O formato a ser utilizado para exibição da data e/ou hora. Se esse argumento for omitido, o Microsoft Word usará o estilo de data abreviada do Painel de controle do Windows (ícone Configurações regionais).

InsertAsField (Boolean) - True para inserir as informações especificadas como um campo TIME. O valor padrão é True.

InsertAsFullWidth (Boolean) - True para inserir as informações especificadas como dígitos de byte duplo. Este argumento pode não estar disponível, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.

DateLanguage (WdDateLanguage) - Define o idioma no qual exibir a data ou hora. Pode ser uma das constantes WdDateLanguage. Este argumento pode não estar disponível, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.

Os valores de retorno possíveis são wdDateLanguageBidi - Formato bidirecional de data/hora, wdDateLanguageLatin - Formato latino de data/hora.

CalendarType (WdCalendarTypeBi) - Define o tipo de calendário a ser usado ao exibir a data ou hora. Pode ser uma das constantes WdCalendarTypeBi. Este argumento pode não estar disponível, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.

Os valores de retorno possíveis são wdCalendarTypeBidi - Calendário bidirecional, wdCalendarTypeGregorian - Calendário gregoriano.