¿Cómo resaltar la celda o selección activa en Excel?
Si tiene una hoja de trabajo grande, tal vez le resulte difícil encontrar la celda activa o la selección activa de un vistazo. Pero, si la celda / sección activa tiene un color sobresaliente, descubrirlo no será un problema. En este artículo, hablaré sobre cómo resaltar automáticamente la celda activa o el rango de celdas seleccionado en Excel.
Resalte la celda activa o la selección con el código VBA
Resalte la celda activa o la selección con el código VBA
El siguiente código VBA puede ayudarlo a resaltar la celda activa o una selección de forma dinámica, haga lo siguiente:
1. Mantenga pulsado el ALT + F11 teclas para abrir el Ventana de Microsoft Visual Basic para Aplicaciones.
2. Entonces escoge ThisWorkbook desde la izquierda Proyecto Explorer, haga doble clic en él para abrir el Módulo, y luego copie y pegue el siguiente código VBA en el Módulo en blanco:
Código VBA: resalte la celda o selección activa
Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
'Update 20140923
Static xLastRng As Range
On Error Resume Next
Target.Interior.ColorIndex = 6
xLastRng.Interior.ColorIndex = xlColorIndexNone
Set xLastRng = Target
End Sub
3. Luego guarde y cierre este código, y regrese a la hoja de trabajo, ahora, cuando seleccione una celda o una selección, las celdas seleccionadas se resaltarán y se moverán dinámicamente a medida que cambien las celdas seleccionadas.
Notas:
1. Si no puede encontrar el Panel del explorador de proyectos en la ventana, puede hacer clic Ver > Proyecto Explorer existentes Ventana de Microsoft Visual Basic para aplicaciones Para abrirlo.
2. En el código anterior, puede cambiar .ColorIndex = 6 color a otro color que te guste.
3. Este código VBA se puede aplicar a todas las hojas de trabajo dentro del libro de trabajo.
4. Si hay algunas celdas coloreadas en su hoja de trabajo, el color se perderá cuando haga clic en la celda y luego se mueva a otra celda.
Artículo relacionado:
¿Cómo resaltar automáticamente la fila y la columna de la celda activa en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!