Como insertar un numero de filas variable con un macro dependiendo una columna de referencia
Hola, me podrían ayudar, mi problema es el siguiente;
tengo una tabla excel en la cual mis datos principales son horas, pero no tienen un patrón que por ejemplo; mi primer dato es 10:30 mi siguiente dato es 10:35 el siguiente es 10:45 y el siguiente es 10:48 y así muchos más, como podría usar un macro de excel para que me inserte filas dependiendo de la diferencia de minutos osea que me inserte 5 filas por debajo de mi primer dato (10:35 - 10:30) y después 10 filas debajo de mi segundo dato (10:45 - 10:35) y 3 filas debajo de mi tercer dato (10:48 - 10:45)
a b
Horario Resta
1 10:30 0 Insertar 5 filas abajo (b2)
2 10:35 5 Insertar 10 filas abajo (b3)
3 10:45 10 Insertar 5 filas abajo (b4)
4 10:48 3 Insertar 5 filas abajo (b5)
Espero haber podido explicarme
Saludos
Alejandro
1 Respuesta
Te mando mi solución sigue mi ejemplo:
-Tenemos en la columna A desde A1 hasta A4 las horas que tu indicas.(Da igual que tengas muchas mas hacia abajo)
-Posiciónate en la primera (en A1) y ejecuta esta macro y todo listo!
Sub ejemplo() 'por luismondelo Do While ActiveCell.Value <> "" resta = Minute(ActiveCell.Offset(1, 0)) - Minute(ActiveCell) ActiveCell.Offset(1, 0).Select For x = 1 To resta ActiveCell.EntireRow.Insert Next ActiveCell.End(xlDown).Select If Application.WorksheetFunction.CountA(Range(ActiveCell.Offset(1, 0), ActiveCell.End(xlDown))) = 0 Then Exit Sub Loop End Sub
recuerda finalizar y puntuar
