Método Range.InsertDateTime (Word)
Inserta la fecha o la hora actual, o ambas, como texto o como campo TIME.
Sintaxis
expresión. InsertDateTime (DateTimeFormat, InsertAsField, InsertAsFullWidth, DateLanguage, CalendarType)
expresión requerida. Variable que representa un objeto Range.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| DateTimeFormat | Opcional | Variant | Formato utilizado para mostrar la fecha, la hora o ambas. Si se omite este argumento, Microsoft Word utiliza el estilo de fecha corto del Panel de control de Windows (icono Configuración regional). |
| InsertAsField | Opcional | Variant | True para insertar la información especificada como campo TIME. El valor predeterminado es True. |
| InsertAsFullWidth | Opcional | Variant | True para insertar la información especificada como dígitos de dos bytes. Este argumento puede no estar disponible, según la compatibilidad con el idioma que haya seleccionado o instalado (por ejemplo, inglés, Estados Unidos). |
| DateLanguage | Opcional | Variant | Establece el idioma en el que se va a mostrar la fecha u hora. Puede ser cualquiera de las constantes WdDateLanguage. Este argumento puede no estar disponible, según la compatibilidad con el idioma que haya seleccionado o instalado (por ejemplo, inglés, Estados Unidos). |
| CalendarType | Opcional | Variant | Establece el tipo de calendario para utilizarla al mostrar la fecha u hora. Puede ser cualquiera de las constantes WdCalendarTypeBi. Este argumento puede no estar disponible, según la compatibilidad con el idioma que haya seleccionado o instalado (por ejemplo, inglés, Estados Unidos). |
Ejemplo:
En este ejemplo, se inserta la fecha actual al final del documento activo. Un resultado podría ser "12/25/99".
With ActiveDocument.Content
.Collapse Direction:=wdCollapseEnd
.InsertDateTime DateTimeFormat:="MM/dd/yy", _
InsertAsField:=False
End With
En este ejemplo, se inserta un campo TIME para la fecha actual en el pie de página del documento activo.
ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range _
.InsertDateTime DateTimeFormat:="MMMM dd, yyyy", _
InsertAsField:=True
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.