Dante Amor respondió:
Suponiendo tus datos en la "Hoja4" de esta manera: Los resultados en la "Hoja5" Cambia en la macro "Hoja4" y "Hoja5" por los nombres de tus hojas. Sub insertar_filas() Dim a As Variant, b As Variant, sh As Worksheet Dim i As Long, j As Long, k As...