Resaltar fila y columna de celda activa en Excel
¿Cómo podemos podemos resaltar ambos ejes de una celda activa para mejorar una presentación o exposición en Excel?
La siguiente macro nos permite añadir un color de relleno a todas las celdas vinculadas a una celda activa en base a los ejes de fila y columna. La macro no se genera dentro de un nuevo módulo sino que se aplica directamente a toda la hoja de referencia.
La instrucción que debemos crear dentro de la hoja objetivo es la siguiente:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rowNumberValue As Integer, columnNumberValue As Integer, i As Integer, j As Integer
Cells.Interior.ColorIndex = 0
rowNumberValue = ActiveCell.Row
columnNumberValue = ActiveCell.Column
For i = 1 To rowNumberValue
Cells(i, columnNumberValue).Interior.ColorIndex = 36
Next i
For j = 1 To columnNumberValue
Cells(rowNumberValue, j).Interior.ColorIndex = 36
Next j
End Sub
|
Dentro de la instrucción vamos a poder cambiar el color de relleno en base a la paleta de colores de VBA. Para ello debemos cambiar el número «36» del ejemplo luego de las dos instancias «ColorIndex =». En el siguiente link podemos ver los colores de referencia: https://www.automateexcel.com/excel-formatting/color-reference-for-color-index/
Esta macro es muy útil si necesitamos por ejemplo realizar presentaciones donde debemos señalar y apuntar a una celda específica para ver su relación con los ejes de fila y columna.
Te recomiendo ver el siguiente link con más videos de Macros útiles de Excel AQUÍ.
¿No sabés como instalar esta macro? ¡No te preocupes! Aquí está la solución:
TUTORIALSalvo aclaración, todas las fórmulas y macros de este sitio están configuradas para aplicarse sobre la celda A1. Algunas fórmulas se encuentran encerradas entre llaves {} debido a que son fórmulas matriciales. Estas llaves no deben introducirse tecleándolas, sino que se generan automáticamente al aceptar la fórmula pulsando Control+Shift+Enter al mismo tiempo. Las fórmulas de este sitio son compatibles con versiones de Microsoft Excel® 2010 o superiores.
