Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

¿Cómo encontrar celdas combinadas?

| 5 comentarios

Cuando se tiene uno o varios conjuntos de celdas combinadas en la hoja activa y se desea identificar que celdas y rangos son, se hace uso de las siguientes propiedades:

-        Celda.MergeCells

-        Celda.MergeArea

La primera identifica si existen celdas combinadas en la hoja activada. La segunda, identifica el rango al que pertenece la celda combinada y arroja la información de los rangos. En caso la celda seleccionada no pertenezca a un conjunto de celdas combinadas el valor que arroja es la celda especifica.

Ejemplo:

En el siguiente ejemplo se tiene una hoja de Excel con algunos conjuntos de celdas combinadas, según la programación mostrada se busca identificar las celdas que forman parte de algún conjunto de celdas combinadas y mostrar sus respectivas ubicaciones (columna, fila). Adicionalmente se muestra un cuadro de texto con los rangos de los diferentes conjuntos de celdas combinadas.

Sub EncontrarCeldasCombinadas()

For Each celda In ActiveSheet.UsedRange

If celda.MergeCells = True Then

mensaje = mensaje & celda.MergeArea.Address & Chr(10)

mensaje2 = mensaje2 & celda.Address & Chr(10)

End If

Next

MsgBox mensaje2

MsgBox mensaje

End Sub

A continuación se muestra el lenguaje en VBA y los resultados que figuran en el programa de Excel:

Lenguaje VBA

VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Resultados en Excel

Excel 1

Excel 2

(Para mayor visualización de  la imagen, hacer click en la misma)

Para mayor detalle sobre el lenguaje de programación descargar el siguiente archivo:

Ejemplo encontrar celdas combinadas - Marcia Guzmán

Elaborado por: Marcia Lucero Guzmán Moncada.

5 comentarios

  1. Como hago para borrar contenido celdas desbloqueadas incluso combinadas en diferentes hojas mediante una macro?

  2. COMO PUEDO IDENTIFICAR Y DESHACER CELDAS COMBINADAS EN TODA UNA HOJA DE UN LIBRO DE EXCEL?

    • 1-.Selecciona toda la hoja
      (lo puedes hacer dando click en la esquina superior izquierda (esquina superior izquierda de celda A1 imagen que parece un triangulo))
      2-.menu inicio, alineación, despliega combinar celdas y das click en separara celdas y listo
      Tienes todas las celdas separadas

  3. Mil gracias! super ayuda!

  4. hola, como puedo hacer para que de un rango de celdas en las que algunas tienen celdas combinadas cambie el tamaño de estas celdas combinadas

Deja una respuesta

Los campos requeridos estan marcados con *.