Jump to content

Colorear fila por fin de actividad


Recommended Posts

He revisado los temas con el buscador y aunque he encontrado algunos que pudieran valerme no he sido capaz de adaptarlos a mi necesidad obteniendo por ello toda clases de errores.

Mi petición es la siguiente:

Llevo el control de uso de una serie de edificios y salas donde se realizan diferentes presentaciones y actos y necesito destacar el final o inicio de cada Orden coloreando la fila correspondiente con un color suave (gris, violeta, ..).

Agradeceré las ayudas que me podáis prestar.Control de actividades.xlsx

Un saludo

Link to post
Share on other sites

Prueba esta macro:

Sub Resaltar()
Const Kolor As Long = 15917529 'Azul tenue
Application.ScreenUpdating = False
For x = 2 To Range("A" & Rows.Count).End(xlUp).Row
   If Range("A" & x) <> Range("A" & x - 1) Then
      Range("A" & x).Resize(1, 6).Interior.Color = Kolor
   End If
Next
End Sub

 

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now


×
×
  • Create New...

Important Information

Privacy Policy