NorfiPC
NorfiPC » Modificar Windows » Ejemplos de macros

Códigos de ejemplos para macros de Word en Visual Basic


Compartir en Google Compartir en Facebook Compartir en Twitter Pinear imágenes en Pinterest
Crear macros en Microsoft Word copiando y pegando el código en el editor de VBA. Recopilación de ejemplos prácticos para copiar y pegar. Cambiar el formato de párrafos, imprimir, insertar imágenes, comentarios y muchas otras acciones, que en ocasiones requieren varios pasos.
Códigos de ejemplos para macros de Word en Visual Basic Sencilla recopilación de algunos códigos para crear macros en Word, Excel y otras aplicaciones incluidas en la suite de Microsoft Office.
Solo es necesario copiarlos y pegarlos en el editor de VBA incluido en estos programas, para crear los macros.
El objetivo es facilitar la creación de macros que pueden resultar muy útiles para la ejecución de diversas tareas.
También incentivar y estimular los que les agrada crear sus propias aplicaciones y configurar el programa que utilizan de forma personal.



¿Cómo usar los códigos para crear las macros?


En otro artículo publicado en este sitio se explica en detalle el proceso de creación de las macros en los programas de Microsoft Office de las dos formas posibles, usando la "Grabadora de macros" y el "Editor de Visual Basic".
En esta página solo iremos publicando y compartiendo los códigos que llegan a nuestras manos o creamos para nuestro uso personal, que se pueden insertar directamente en el editor de VBA y así crear macros.
Solo es necesario copiar el código, abrir el editor usando las teclas ALT + F11 y pegar.
Pegar los códigos en el editor de Visual Basic para crear macros
Posteriormente abrir la ventana "Macros" (teclas ALT + F8), seleccionar la macro creada y ejecutarla.
Lógicamente es posible asignar a cada macro un icono y situarlo en la Barra de acceso rápido o una combinación de teclas.



Códigos para crear macros en Word


Ejemplos de acciones elementales


Algunos de los macros pueden ser sumamente sencillos.
Experimenta con los siguientes códigos y modifícalos a tu gusto.
Cualquier cambio hecho en el editor, toma efecto inmediatamente.
Para conocer más de la estructura del código, puedes crear macros usando la "Grabadora de macros" y posteriormente observar el código en el "Editor de VBA".

Cambiar formato

El siguiente macro cambia el formato del texto seleccionado.
Sub for1()
' Cambiar tamaño de la fuente
Selection.Font.Size = 20
' Cambiar el tipo de fuente
Selection.Font.Name = "Britannic Bold"
' Poner texto en negrita
Selection.Font.Bold = wdToggle
' Poner texto en italic
Selection.Font.Italic = wdToggle
' Darle el color rojo
Selection.Font.Color = wdColorRed
End Sub
Para alinear el texto usa:

' Alinear texto a la izquierda:
Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
' Alinear texto a la derecha:
Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
' Centrar texto:
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
' Texto justificado completo
Selection.ParagraphFormat.Alignment = wdAlignParagraphJustify

Para seleccionar todo el texto usa:
Selection.WholeStory

Insertar texto

Para insertar cualquier texto predeterminado en el punto de inserción del cursor del ratón usa:
Sub SustT()
Selection.TypeText Text:="este texto"
End Sub



Códigos para copiar y pegar


Para copiar cualquiera de los códigos da un clic en el cuadro de texto que los contienen y usa las teclas CONTROL + C.
En los códigos las líneas antecedidas de una comilla (‘), en el editor se muestran de color verde, son solo comentarios.

Imprimir todos los documentos abiertos

Macro que nos permite enviar a la impresora de una vez, todos los documentos de Word que tengamos abiertos.


Vista previa de impresión al 100%

En las versiones recientes de Word al decidir imprimir un documento se abre la ventana de vista previa con la barra de opciones a la izquierda, por lo que la vista previa del resultado final de la impresión se muestra reducida.
Usando el siguiente macro la vista previa se mostrará al 100%, pasando las opciones de impresión a la parte superior como en versiones anteriores.




Imprimir todos los documentos que están en una carpeta

Macro para imprimir todos los documentos que se encuentren en el interior de una carpeta especifica.
Los que imprimen regularmente solo necesitan copiar a dicha carpeta, creada para ese fin los documentos.
Se debe especificar el código la ruta absoluta a dicha carpeta.


Pegar texto sin formato

Al copiar y pegar texto desde una página web a un documento de Word, se mantendrá el formato de origen, lo que puede ser molesto. Es necesario antes de pegar escoger: "Pegado especial > Texto sin formato".
La siguiente macro permite hacer lo anterior con una sola instrucción o botón.




Insertar imágenes desde una cámara o escáner

En las versiones recientes de Word no se incluye la opción: "Insertar –> Imagen –> Desde escáner o cámara".
Es necesario abrir previamente la Galería Multimedia, agregar la imagen y solo después en Word usar: "Insertar –> Imágenes prediseñadas".
La siguiente macro permite insertar directamente cualquier imagen directamente desde una cámara o un escáner conectado, al igual que en Office 2003.


Encerrar texto entre comillas

Inserta comillas al comienzo y final del texto seleccionado.
De forma similar se puede usar la macro para encerrar texto entre comillas simples, paréntesis, llaves o corchetes, con solo modificar el código.


Encerrar texto entre paréntesis

Inserta paréntesis al comienzo y final del texto seleccionado.




Cambiar el formato al texto entre paréntesis

Poner en italic y dar color rojo al texto que se encuentre encerrado entre paréntesis.


Listar todas las fuentes instaladas

Interesante macro que permite crear en un nuevo documento un listado de todas las fuentes instaladas en el sistema, con una vista previa de cada una.
Lista útil para tener a mano o imprimir.


Insertar un comentario

Permite insertar un comentario predeterminado en el punto de inserción o sea donde se situe el cursor del ratón en un documento.
Sustituye en el código "COMENTARIO" por lo que debe aparecer.


Insertar un símbolo determinado en un documento

Usa la macro siguiente para insertar cualquier símbolo en el punto de inserción.
En este caso se inserta un corazón, pero puede hacerse con cualquier otro símbolo especificando en el código su número decimal y la fuente de ser necesario.
Es posible insertar caracteres Unicode.
Usa la herramienta Símbolos de Word para identificarlos.


Ventana de alerta con la fecha de hoy



Insertar fecha en el documento



Ejecutar los macros de forma automática


Podemos crear macros que se ejecuten automáticamente, son llamadas AutoMacros.
Para eso es necesario crearlas y darles un nombre específico.
Son las siguientes:
AutoExec. Se ejecuta al abrir Word.
AutoExit. Se ejecuta al cerrar Word.
AutoOpen. Se ejecuta cuando se abre un documento desde la plantilla donde tenemos la macro.
AutoClose. Se ejecuta cuando se cierra un documento desde la plantilla donde tenemos la macro.
AutoNew. Se ejecuta cuando se crea un nuevo documento desde la plantilla donde esta la macro.

Páginas relacionadas



Síguenos en las redes sociales de internet


Norfi Carrodeguas en Google+ Trucos de NorfiPC en Facebook @NorfiPC en Twitter NorfiPC en Pinterest

Buscar en este sitio

 
 
Inicio | Mapa del sitio | Sobre mí | RSS