Colorear fila de la celda activa

Hola expertos quisiera me ayuden con lo siguiente quisiera que al colocar el cursor en cualquier celda toda la fila adopte un color y que vuelva a ser normal cuando se pase a otra celda

Si me envían una ejemplo en excel les quedare muy agradecido

Saludos Phisis

1

1 Respuesta

99.775 pts.

1 crea un nuevo libro

2 abre el editor de visual basic

3 inserta un modulo

En este modulo pones esto:

Option explicit

public antes as integer

sub color(fila as integer)

if [iv65535]<> 1 then exit sub

if antes=fila then exit sub

if antes=0 then antes=fila

'4c7569735f50

range("a" & antes & ":" & "iv" & antes).interior.pattern=xlnone

range("a" & fila & ":" & "iv" & fila).interior.color=vbyellow

antes=fila

end sub

public sub activa_regla()

[iv65535]=1

end sub

public sub desactiva_regla()

[iv65535]=""

selection.entirerow.interior.pattern=xlnone

end sub

4 desde el editor de vbasic da docle click sobre alguna hoja, en la ventana de edicion de vbasic correspondiente a esa hoja pones esto en el evento "worksheet_selectionchange"

call color (target.row)

Grabas y listo

Ya tienes 3 macros que funcionan de la sgte manera

Ubicado en la hoja en que pusiste la llamada a la sub color, presionas alt+f8 y selecionas el macro "activa_regla", luego cada vez que muevas el puntero pasara la fila al color amarillo

Para detener el macro presionas alt+f8 y ejecutas "desactiva_regla".

Esto se peude mejora, puedes asignarles teclas abreviadas a las macro antes citadas

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas