Cómo agregar automáticamente texto al encabezado de un documento en Microsoft Word usando VBA

Cómo agregar automáticamente texto al encabezado de un documento en Microsoft Word usando VBA

Los encabezados son un excelente lugar para presentar su documento de Word y también son fáciles de usar. Solo necesita hacer doble clic en el encabezado y escribir, ¿verdad? Tan fácil como es, como cualquier otra cosa, esta tarea puede volverse bastante monótona y molesta si tiene que agregar el mismo encabezado para varios documentos seguidos.





MAKEUSEOF VÍDEO DEL DÍA

Para ese escenario, o quizás para otros escenarios, VBA resulta útil. Con VBA, puede escribir un fragmento de código que agrega automáticamente el texto que desea al encabezado de su documento.





Agregar automáticamente texto al encabezado del documento con VBA en Word

VBA o Visual Basic para aplicaciones es una forma integrada de Visual Basic utilizada en las aplicaciones de Microsoft Office. VBA le permite escribir códigos para crear macros, lo que a su vez automatiza tareas que de otro modo tendría que hacer manualmente. VBA incluso le permite crear sus propios botones y funciones personalizados para Microsoft Word.





En este artículo, vamos a crear una macro y escribir un código para ella, que agregará texto personalizado al encabezado del documento. Los encabezados son una sección útil en los documentos de Word y puedes sacar mucho provecho de los encabezados en Microsoft Word .

Como ejemplo, vamos a crear un código que agregue el texto Escrito y publicado por MakeUseOf al encabezado. Vamos a poner este texto en negrita y alinearlo con el centro del documento.



1. Acceso a la pestaña Desarrollador

El primer paso para crear macros de Word es acceder a la pestaña Desarrollador desde la cinta. Esta pestaña está desactivada de forma predeterminada, ya que las macros están reservadas para usuarios avanzados. Las macros descargadas son una manera fácil para que los piratas informáticos accedan e instalen malware en su sistema, por lo que Microsoft ha decidido bloquearlos por defecto .

Dicho esto, deberá habilitar la pestaña Desarrollador desde las Opciones. Por supuesto, si ha usado macros antes, la pestaña Desarrollador ya estará disponible, por lo que no es necesario volver a hacer esto. Si es la primera vez que trabaja con macros y VBA en programas de Office, es una buena idea leer nuestra guía sobre cómo empezar a usar macros en Word .





  Configuración de la cinta de palabras
  1. En Microsoft Word, vaya a la Expediente menú.
  2. Seleccione Opciones . Esto abrirá la ventana Opciones de Word.
  3. En el Opciones de palabra ventana, seleccione Personalizar la cinta .
  4. A la derecha, debajo Pestañas principales , desplácese hacia abajo y verifique Desarrollador .
  5. Hacer clic OK .

Ahora verá la pestaña Desarrollador en la cinta, justo entre Ver y Ayuda.

2. Creando la Macro

Ahora es el momento de ensuciarse las manos con una macro y algo de código. Una vez que crea una macro y escribe el código para ella, puede asignarle un acceso directo para que no tenga que ir al menú de macros cada vez.





De esta manera, puede aumentar aún más su productividad, ya que solo presionará una combinación de teclas en su teclado y la magia sucederá detrás de escena.

  Menú de macros en Word
  1. Ve a la Desarrollador pestaña.
  2. Haga clic en macros desde el Código sección.
  3. Introduzca un nombre para su macro. vamos a nombrar los nuestros muoEncabezado .
  4. Haga clic en Crear .
  Una macro en blanco en Word

Una vez que haga clic Crear , se abrirá una nueva ventana que contiene dos líneas de código y una línea de información. Las líneas Sub y End Sub marcan el inicio y el final del código de su macro. Inserte el siguiente código entre las dos líneas:

Dim headerRange As Range 
Dim headerText As String
Set headerRange = ActiveDocument.Sections.Item(1).Headers(wdHeaderFooterPrimary).Range
headerRange.Text = "Written and Published by MUO"
headerRange.Font.Bold = True
headerRange.ParagraphFormat.Alignment = wdAlignParagraphCenter

La declaración Dim en este código declara el rango de encabezado y texto de cabecera variables como Rango y un Cuerda respectivamente. A continuación, el Establecer declaración establece el rango de encabezado variable al encabezado del documento activo actual.

los Establecer primero accede al documento activo actual, luego a sus secciones, luego al primer elemento y los encabezados que contiene. Finalmente, accede al encabezado principal en Word y luego lo establece como un Rango .

Una vez que estos dos son declarados, el rango de encabezado text se establece en el texto que queremos. En la línea siguiente, la fuente se establece en negrita y luego, en la línea final, la alineación del párrafo se establece en el centro. Los parámetros que comienzan con 'wd' indican que el parámetro es exclusivo de Microsoft Word.

los Sub y Finalizar sub los códigos no están incluidos en este fragmento anterior, ya que se supone que debe pegar el código del fragmento entre estos dos. Su código final debería verse como la imagen a continuación:

  La macro de inserción de texto de encabezado para Word

3. Usando la macro

Una vez que haya configurado el código, estará listo para usar la macro. No hay necesidad de guardarlo; todo lo que escriba en el espacio de trabajo de VBA se guarda instantáneamente. ¡Ahora es el momento de configurar un acceso directo para la macro y ver si funciona!

  1. Ve a la Expediente menú.
  2. Seleccione Opciones .
  3. Seleccione Personalizar la cinta .
  4. Haga clic en personalizar junto a Atajos de teclado en la parte inferior de la ventana. Esto abrirá la ventana Personalizar teclado.
  5. En el Personalizar teclado ventana, desplácese hacia abajo en la Categorías enumerar y seleccionar macros .
  6. En el menú de la derecha, seleccione su macro.
  7. Haga clic en el cuadro de texto debajo, Presiona nueva tecla de atajo .
  8. Introduzca la combinación de teclas en su teclado. Es una buena idea usar Control , Todo , y Cambio al mismo tiempo. De esta forma, la combinación probablemente no estará ya en uso. vamos a usar Todo + Control + Cambio + H .
  9. Haga clic en y luego haga clic en OK .

Ahora es el momento de ver la magia en el trabajo. Presione la combinación de teclas que acaba de asignar a su macro en su teclado. Con suerte, verás el texto en tu encabezado. ¡Audaz y centrado! Si las cosas no salen según lo planeado, rastree sus pasos y verifique que no haya errores en su código.

Siempre que desee cambiar el texto que el código agrega a su encabezado, puede ir al menú de macros y editar la macro. Si tiene curiosidad acerca de los accesos directos predeterminados de Word, eche un vistazo a nuestro Hoja de trucos de métodos abreviados de teclado de Microsoft Word .

Automatice su flujo de trabajo

Es cierto que agregar texto al encabezado de un documento en Word requiere poco esfuerzo, pero poco esfuerzo en grandes cantidades puede volverse monótono, si no difícil. De todos modos, si puede hacerlo más fácil y menos lento, ¿por qué no hacerlo?

cómo ejecutar programas mac en windows

VBA existe para servir a tales propósitos. Si deseaba una función de Word que agregara automáticamente un texto personalizado al encabezado de cualquier documento, ya no necesita desearlo. Con VBA, puede crear cualquier función que considere que le falta a Word. Agregar texto al encabezado de un documento es solo un ejemplo minúsculo de lo que puede lograr con VBA en Word.

Ahora sabe cómo escribir código para este propósito y asignarle un acceso directo. Entonces, todo lo que necesita hacer es presionar una combinación de teclas, sentarse y observar cómo Word hace el aburrido trabajo por usted en milisegundos.