Combinar celdas. Macros para principiantes

Vamos a ver en esta entrega un código que nos servirá para combinar celdas. 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 Ejemplo13 luego de la línea End Sub que marca el final de dicha macro e insertamos el siguiente código:

Sub Ejemplo14()

'Esta macro combina las celdas de la fila 16 y luego de un mensaje les quita la combinación

Range(“16:16”).Merge

MsgBox “Se han combinado las celdas de la Fila 16”

Range(“16:16”).UnMerge

MsgBox “Se han descombinado las celdas de la Fila 16”

End Sub

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

  1. La primera línea Sub Ejemplo14(), indica el inicio y nombre de la macro Ejemplo14.
  2. La segunda línea ‘Esta macro combina las celdas de la fila 16 y luego de un mensaje les quita la combinación, 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 combinan las celdas de la fila 16 mediante la aplicación del método Merge (Combinar). Range("16:16").Merge
  4. La cuarta línea es el código para mostrar el mensaje de que las celdas de fila 16 se han combinado. MsgBox "Se han combinado las celdas de la Fila 16"
  5. La quinta línea es el código con el cual se descombina la fila 16 mediante la aplicación del método UnMerge Range("16:16").UnMerge
  6. La sexta línea es el código para mostrar el mensaje de que las celdas de la fila 16 se han descombinado. MsgBox "Se han descombinado las celdas de la Fila 16"
  7. La última línea marca el fin (End) de la Macro o Subrutina (Sub)

Al ejecutar el código el resultado es:

Al dar Aceptar se ejecuta la segunda parte del código:

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.