xltoday.net



Colorear celdas Excel al hacer click

Este trocito de código VBA Excel colorear celdas al hacer click sobre ellos. Es una macro que utiliza el evento Worksheet_SelectionChange de las hojas de libro Excel.

Por eso hay que incluir este código en los objetos de las hojas. En ejemplo abajo habría que poner el código en los contenedores de código de una o mas de los objetos Hoja1, Hoja2 y Hoja3.

ejemplo vba_proyecto

Para colorear solo la celda activa


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 ActiveCell.Interior.ColorIndex = 3
End Sub

Para colorear todas las celdas seleccionadas


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Target.Interior.ColorIndex = 3
End Sub