Excel - Duda

Duda

Publicado por Victor (2 intervenciones) el 24/04/2014 20:36:10

Buenas Tardes a todos

De que manera puedo automatizar la insercion de renglones entre lineas

x
x
x
x

x
Renglon en Blanco
x
Renglon en Blanco
x
Renglon en Blanco
x
Renglon en Blanco

Son 15000 registros y no quisieras hacerlos uno a uno.

Saludos y que esten bien

Valora esta pregunta

Me gusta: Está pregunta es útil y esta clara

No me gusta: Está pregunta no esta clara o no es útil

Responder

Duda

Publicado por Luis Carlos (13 intervenciones) el 25/04/2014 01:53:20

hola saludos desde Colombia.

bueno pues la forma de hacerlo es muy sencilla solo tienes que grabar una macro y ya esta.

ahora que la grabación de la macro si depende la versión del office que utilices.

Valora esta respuesta

Me gusta: Está respuesta es útil y esta clara

No me gusta: Está respuesta no esta clara o no es útil

Comentar

Duda

Publicado por Victor (2 intervenciones) el 25/04/2014 01:56:18

Pues ya lo hice a mano....
ahí para la otra

Gracias...

Saludos hasta Colombia desde Mexico

Valora esta respuesta

Comentar

Pos: 28

Val: 81

Duda

Publicado por Cacho R (66 intervenciones) el 25/04/2014 02:30:26

Hola!
Suponiendo que tienes selecionada alguna de las celdas del rango a procesar, una forma de hacerlo es mediante el siguiente código:

Sub Insertar_Filas_en_Blanco()
Dim Q
With Selection.CurrentRegion

Q = .Rows.Count
.Cells(1).EntireColumn.Insert
.Columns(1).Offset(, -1) = "=row()"
.Columns(1).Offset(Q, -1) = "= 0.1 + " & .Cells(1).Offset(, -1).Address(0, 0)
.Cells(1).Offset(, -1).Resize(2 * Q) = .Cells(1).Offset(, -1).Resize(2 * Q).Value

End With
With Selection.CurrentRegion

.Sort .Cells(1), 1, Header:=2
.Cells(1).EntireColumn.Delete

End With
End Sub

Saludos, Cacho R.

Valora esta respuesta

Comentar

duda excel

Comparar 2 celdas