Método TextRange.InsertDateTime (Publisher)

Retorna um objeto TextRange que representa a data e a hora inseridas em um intervalo de texto especificado.

Sintaxe

expressão. InsertDateTime (Format, InsertAsField, InsertAsFullWidth, Language, Calendar)

Expressão Uma variável que representa um objeto TextRange .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Format	Obrigatório	PbDateTimeFormat	Um formato para a data e a hora. Pode ser uma das constantes PbDateTimeFormat declaradas na biblioteca de tipos do Microsoft Publisher.
InsertAsField	Opcional	Boolean	True para o Publisher atualizar data e hora sempre que abrir a publicação. O padrão é False.
InsertAsFullWidth	Opcional	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. O padrão é False.
Idioma	Opcional	MsoLanguageID	O idioma no qual exibir a data e hora. Pode ser uma das constantes MsoLanguageID declaradas na biblioteca de tipos do Microsoft Office.
Calendar	Opcional	PbCalendarType	O tipo de calendário para ser usado ao exibir a data ou hora. Pode ser uma das constantes PbCalendarType . O padrão é pbCalendarTypeWestern.

Valor de retorno

TextRange

Exemplo

Este exemplo insere um campo para a data atual na posição do cursor.

Sub InsertDateField() 
 Selection.TextRange.InsertDateTime Format:=pbDateLong, InsertAsField:=True 
End Sub

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.