Steve crea documentos que requieren que el nombre del archivo del documento se establezca en el encabezado y en leyendas legales en la primera y segunda página del documento. Ha creado una macro que, después de escribir el nombre del archivo en el encabezado, lo copia y lo pega en los campos del formulario de texto en las leyendas en los lugares adecuados. Su siguiente paso de ensamblaje de documentos es guardar el documento usando el comando «Guardar como». El documento se guardará con el mismo nombre de archivo ingresado en el encabezado y los subtítulos.

Al hacer esto manualmente, Steve muestra el cuadro de diálogo Guardar como, pega el nombre del archivo en él y luego hace clic en Guardar. Ha intentado crear el código de la macro para agregar este paso «Guardar como», pero no puede averiguar cómo hacerlo. Cuando Word registra los pasos manuales, Steve obtiene algo como lo siguiente:

ActiveDocument.SaveAs FileName:="04562.sw.docx

Esto muestra que Word está grabando el nombre de archivo específico que se usa al seguir los pasos manuales, pero Steve quiere usar un nombre de archivo diferente, según lo que está en el encabezado del documento. Esa información (el nombre del archivo) está en el Portapapeles cuando se ejecuta la macro, por lo que también es posible obtener la información del Portapapeles, pero Steve tampoco sabe cómo hacerlo.

Dado que Steve ya tiene una macro para copiar el nombre del archivo, y está contento con esa macro, solo debería necesitar un par de cambios en su código para guardar el archivo con el nombre correcto. Intente agregar el siguiente código a los lugares apropiados en su macro existente:

Dim strTemp As String Dim MyData As DataObject Set MyData = New DataObject

MyData.GetFromClipboard strTemp = MyData.GetText(1)

ActiveDocument.SaveAs FileName:=Trim(strTemp) & ".docx"

Siempre que tenga una cadena de texto en el Portapapeles que desee usar para su nombre de archivo, este código debería funcionar. Incluso agrega la extensión .Doc al final de la cadena en el Portapapeles. Este código requiere que configure una referencia para Microsoft Forms en el Editor de VBA.

(Elija Referencias en el menú Herramientas del Editor).

Por supuesto, debe señalarse que es posible que desee reconsiderar su enfoque de esta macro. De hecho, es posible que pueda deshacerse de la mayor parte de su código si adopta un enfoque completamente diferente. Por ejemplo, podría hacer que las personas primero guarden el documento y luego hagan referencia al nombre del archivo en el documento mediante el uso de campos. (El campo NOMBRE DE ARCHIVO podría usarse para este propósito.)

En lugar de usar una macro para copiar el nombre del archivo a la primera y segunda página del documento, también puede usar un estilo definido (como DocTitle o DocName) para hacer referencia a su nombre de archivo, y luego usar el campo STYLEREF en otra parte de su documento para hacer referencia a ese nombre. De esa manera, solo debe ingresarse una vez y no es necesaria ninguna macro. Puede encontrar varias formas de repetir datos en diferentes áreas del documento en esta página del sitio de Word MVP:

http://gregmaxey.mvps.org/Repeating_Data.htm

También puede crear un formulario de usuario para recopilar los datos del usuario (para obtener el nombre de archivo deseado) y luego guardar el documento con ese nombre.

La macro podría entonces asignar el nombre del archivo al campo TÍTULO, y cualquier lugar del documento que haga referencia al campo TÍTULO mostrará automáticamente el nombre del archivo que ingresó el usuario.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios WordTips), he preparado una página especial que incluye información útil.

link: / wordribbon-WordTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

WordTips es su fuente de formación rentable en Microsoft Word.

(Microsoft Word es el software de procesamiento de texto más popular del mundo). Este consejo (10809) se aplica a Microsoft Word 2007, 2010, 2013 y 2016. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Word aquí:

link: / word-Saving_in_a_Macro_Using_a_Desired_File_Name [Guardar en una macro usando un nombre de archivo deseado].