Guarde un documento de Word con la fecha actual en el nombre del archivo mediante código VBA
Para añadir automáticamente la fecha actual al nombre del archivo al guardar el documento de Word, siga estos pasos:
1. Mantenga pulsadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. A continuación, haga clic en Insertar > Módulo y copie y pegue el siguiente código en el módulo en blanco que se abre:
Código VBA: Guarde un documento de Word con la fecha actual en el nombre del archivo
Public Sub FileSave1()
Dim xDlg As Dialog
Dim xTitle As String
On Error Resume Next
xTitle = ActiveDocument.BuiltInDocumentProperties("Title").Value
xTitle = xTitle & " " & Format((Year(Now() + 1) Mod 100), "20##") & "-" & _
Format((Month(Now() + 1) Mod 100), "0#") & "-" & _
Format((Day(Now()) Mod 100), "0#")
Set xDlg = Dialogs(wdDialogFileSaveAs)
xDlg.Name = xTitle
xDlg.Show
End Sub
3. Tras pegar el código en el módulo, pulse la tecla F5 para ejecutarlo. Se mostrará una ventana de Guardar como con la fecha actual ya insertada automáticamente en el cuadro de texto Nombre de archivo. Consulte la captura de pantalla:
4. A continuación, solo tienes que escribir el nombre de archivo que desees. Consulta la captura de pantalla:
Haga más en menos tiempo con Kutools para Word potenciado por IA
Kutools para Word no es solo un conjunto de herramientas; es una solución inteligente diseñada para potenciar su productividad. Gracias a sus capacidades impulsadas por IA y a las funciones más esenciales, Kutools le permite lograr más en menos tiempo:
Resuma, reescriba, redacte y traduzca contenido al instante.
Corrija textos en tiempo real con sugerencias de gramática, puntuación y estilo mientras escribe.
Reformule y traduzca el contenido manteniendo intactos el diseño, el estilo y la estructura.
Traduzca su contenido fácilmente a más de 40 idiomas y amplíe su alcance a nivel global.
Obtenga ayuda inmediata e ideas inteligentes basadas en el contenido de su Documento Actual.
Pregunte cómo realizar una tarea —como eliminar un salto de sección— y la IA le guiará o lo hará por usted.
Redacte información sensible o confidencial en segundos y garantice una privacidad total.
Todas las herramientas funcionan a la perfección dentro de Word, siempre al alcance de tu mano.
Cree, perfeccione, traduzca, resuma y proteja documentos con total facilidad.
Mejore la gramática, la claridad y el tono mientras escribe, en tiempo real.
Reformule y traduzca el contenido sin realizar ningún cambio en el diseño ni en el formato.
Pregunte cómo realizar una tarea —como eliminar un salto de sección— y la IA le guiará o lo hará por usted.
Todas las herramientas funcionan a la perfección dentro de Word, siempre al alcance de tu mano.
✨ Kutools for Office – ¡Una instalación, cinco herramientas potentes!
Incluye Office Tab Pro·Kutools para Excel·Kutools para Outlook·Kutools para Word·Kutools for PowerPoint
📦 Obtenga las 5 herramientas en un único conjunto | 🔗 Integración perfecta con Microsoft Office | ⚡ Ahorrar tiempo y aumente su productividad al instante
