Actividad pública reciente
Ha valorado "Excelente" la respuesta
Cambiar color de celda.
Cambia tu código por este Private Sub Worksheet_Change(ByVal Target As Range) datos = "$7:$15" If Not Application.Intersect(Target, Range(datos)) Is Nothing Then ActiveCell.Offset(0, -1).Activate ActiveCell.Interior.ColorIndex = 5...
Ha empezado a seguir a 
d2enri
d2enri
Ha valorado "Buena" la respuesta
Mover datos de fila a columna.
Entrá al Editor de macros (con Alt y F11), insertá un módulo y allí copiá la siguiente rutina: Sub MOVIENDO() 'desarrollada por Elsamatilde Range("B1").Select 'recorre la col B hasta encontrar una celda vacía, suponiendo el fin del rango While...