Tabla de contenido
Plantilla actual
Esta macro de Word VBA mostrará la plantilla actual:
Sub DisplayCurrentTemplate () 'muestra la ruta completa del documento activo de la plantilla MsgBox ActiveDocument.AttachedTemplate.FullName, "Ubicación de la plantilla" End Sub
Crear nueva plantilla
Esta macro de Word VBA creará una nueva plantilla:
Sub MakeNewTemplate () 'crea un nuevo documento y lo guarda como una plantilla. Ejemplo easyexcel.net template.dotm "Establecer oDoc = Documents.Add 'crear un nuevo documento y asignarlo a la variable oDoc' escribir texto en el nuevo documento refiriéndose a él usando la variable oDoc oDoc.Range.InsertBefore" Plantilla de muestra "oDoc. Range.InsertParagraphAfter oDoc.Range.InsertAfter "Visita https://easyexcel.net/vba-code-library" oDoc.SaveAs FileName: = strPath & strName, FileFormat: = wdFormatXMLTemplateMacroEnabled, AddToRecentFiles: = False oDochangesNotSavec End Sub