d2enri respondió:
En principio veo mal una fila cambia tu código por este otro Sub formato() ' ' formato Macro ' ' Range("D5").Select Selection.Copy Sheets("reporte").Select Range("B2").Select Selection.Insert Shift:=xlDown Sheets("formato").Select Range("D7").Select...