Adicionar una nueva hoja y mostrar su nombre. Macros para principiantes

Vamos a ver en esta entrega un código que nos servirá para insertar una nueva hoja en el libro de trabajo y mostrar su nombre en un mensaje (MsgBox). 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 Ejemplo9 luego de la línea End Sub que marca el final de dicha macro e insertamos el siguiente código:

Sub Ejemplo10()

'Esta macro inserta una nueva hoja y luego muestra su nombre

Sheets.Add

MsgBox Activesheet.Name

End Sub

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

  1. La primera línea Sub Ejemplo10(), indica el inicio y nombre de la macro Ejemplo10.
  2. La segunda línea ‘Esta macro inserta una nueva hoja y luego muestra su nombre, 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. La tercera línea es el código con el cual se inserta una nueva hoja Add
  4. La cuarta línea es el código para mostrar el nombre de la nueva hoja MsgBox ActiveSheet.Name
  5. La última línea marca el fin (End) de la Macro o Subrutina (Sub)

Al ejecutar el código el resultado es:

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.