Jump to content
joselopezitot

AYUDAAAA -Resaltar filas Vba, Con tablas dinámicas

Recommended Posts

Soy nuevo en estas cosas, intento aprender a programar, lo que quiero hacer en el archivo que les dejo, es:

 resaltar filas, lo cual funciona. Pero solo en un determinado rango, lo que quiero es que se resalte en una tabla dinámica al aumentar filas y creo que también funciona, pero al seleccionar mas abajo osea fuera de la tabla se sigue resaltando y se queda resaltado...Solo quiero que se resalte en la tabla dinámica... Gracias de antemano

ARCHIVO.xlsm

Edited by joselopezitot

Share this post


Link to post
Share on other sites

@joselopezitot, cambia el código por el siguiente:
 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Fila As Long, Columna As Long, uF As Long

Hoja3.Range("Tabla35[[JULIO CESAR]:[JUAN]]").Interior.ColorIndex = 0

uF = Range("A" & Rows.Count).End(xlUp).Row

If Intersect(Target, Range("D4:J" & uF)) Is Nothing Then Exit Sub

Fila = ActiveCell.Row
Hoja3.Range("D" & Fila & ":J" & Fila).Interior.ColorIndex = 15

End Sub

 

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.

INFORMACIÓN BÁSICA SOBRE PROTECCIÓN DE DATOS

Responsable: Sergio Andrés Celemín

Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.

Legitimación: Consentimiento del interesado.

Destinatarios: Hetzner Online GmbH.

Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso,
rectificación, supresión, oposición y demás derechos legalmente establecidos a
través del email sergio@ayudaexcel.com.

Información adicional: Encontrarás más información en la política de privacidad.




×
×
  • Create New...

Important Information

Privacy Policy