Fecha del Tema: 2013-04-17 14:11:01

Esta macro enstera una fila de por madio comenzando de la casilla A2 hasta
que encuentre una casilla en blanco.
<?php // esto no va
Sub insertarfilas()
`
` insertarfilas Macro
` Macro grabada el 05/04/2013 por julio
`

`
Dim a As Integer
a = 2
Do While Range("A" & a).Value <> ""
Rows(a & ":" & a).Select
    Selection.Insert Shift:=xlDown
    Range("A" & a).Select
a = a + 2
Loop

End Sub
?> // esto no va