Aplicación de todos los ejemplos en una sola Macro. Macros para Principiantes

Para cerrar con estos ejemplos sencillos de macros para principiantes, vamos a aplicar todos los 16 ejemplos que hemos visto pero en una sola macro; de esta manera se podrá entender un poco mejor el desarrollo de las macros. Vamos a utilizar el mismo archivo Excel con el que hemos estado trabajando en el mismo Módulo1:

Nos vamos a ubicar al final del Ejemplo16 luego de la línea End Sub que marca el final de dicha macro e insertamos el siguiente código:

Sub Ejemplo17()

'En esta macro se van a aplicar los ejemplos vistos hasta ahora

'Esta linea insertará un texto en la celda A20

Range("A20") = "Excel para contadores."

'Esta linea toma el valor de la celda A20 y lo presenta en un MsgBox

MsgBox Range("A20")

'Esta linea cambiara el color de relleno de la celda A20

Range("A20").Interior.ColorIndex = 3

'Esta linea cambiara el color de fuente de la celda A20

Range("A20").Font.ColorIndex = 5

'Esta linea cambiara el tamaño de fuente de la celda A20

Range("A20").Font.Size = 14

'Esta linea copiara el texto de la celda A20 y lo pegara en la celda B20

Range("A20").Copy Destination:=Range("B20")

'Esta linea muestra el nombre de la hoja

MsgBox ActiveSheet.Name

'Esta linea muestra el nombre del libro de trabajo en la celda B21

Range("B21") = ActiveWorkbook.Name

'Esta linea inserta la Fila 21

Rows(21).Insert

'Esta linea asigna un valor de alto para la fila 20

Rows(20).RowHeight = 40

End Sub

Observemos que estamos en el mismo Módulo1 pero se trata de otra macro cuyo nombre es Ejemplo17 y se encuentra separada del Ejemplo16 por una línea negra.

  1. La primera línea Sub Ejemplo17(), indica el inicio y nombre de la macro Ejemplo17.
  2. La segunda línea ‘En esta macro se van a aplicar los ejemplos vistos hasta ahora, es un comentario informativo para identificar más fácil lo que realizará la macro. Observemos que al inicio de esta línea tiene una comilla sencilla y en el Editor VB se marcará en color verde toda la línea.
  3. Las demás líneas son las aplicación de los ejemplos vistos hasta ahora
  4. La última línea marca el fin (End) de la Macro o Subrutina (Sub)

Vamos a ejecutar el código con la opción Paso a Paso para ver el resultado en paralelo en la hoja de Excel:


Finalmente solo queda vincular la macro a cualquier objeto que podamos insertar en la hoja y listo.

Descargar archivo de trabajo.

MÁS SOBRE

Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Siéntase libre de opinar

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc. Lo que no está permitido es insultar o escribir palabras ofensivas o soeces. Si lo hace, su comentario será rechazado por el sistema o será eliminado por el administrador. Por último, trate de no escribir en mayúscula sostenida, resulta muy difícil leerle.