Cómo obtener la fila inicial y la fila final de una celda combinada
Experto, y cuál sería la macro para saber la fila inicial y la fila final de una celda combinada. Gracias
1 respuesta
Respuesta de Dante Amor
1
Te anexo la macro para obtener la fila inicial y final y también la columna inicial y final de una celda combinada.
Cambia "E3" por la celda que quieres revisar.
Para obtener la fila final, primero debes obtener la fila inicial, ya que la variable se ocupa, lo mismo para la columna final.
Sub CeldaCombinada() 'Por.Dante Amor celda = "E3" If Range(celda).MergeCells Then f_ini = Range(celda).MergeArea.Cells(1, 1).Row 'fila inicial f_fin = Range(celda).MergeArea.Rows.Count + f_ini - 1 'fila final c_ini = Range(celda).Cells(1, 1).Column 'columna inicial c_fin = Range(celda).MergeArea.Columns.Count + c_ini - 1 'columna final Else MsgBox "La celda NO está combinada" End If End Sub
Saludos.Dante Amor
Recuerda valorar la respuesta.
