Actividad pública reciente
Ha empezado a seguir el tema Visual Basic
Ha empezado a seguir el tema Microsoft Excel
Ha empezado a seguir el tema Programación
Ha valorado "Excelente" la respuesta
Seleccionar 1 celda si y 6 celdas no
[Hola Te paso la macro Valora la respuesta marcando buena o Excelente saludos! Sub Select_rangos() ' 'Fuente Dante//'Act. Adriel Ortiz ' Set a = Cells(3, "A") For i = 3 To Range("A" & Rows.Count).End(xlUp).Row Step 6 Set a = Union(a, Cells(i, "A"))...