Non ho capito perchè non fai copia incolla di tutto il range in un colpo solo.
Comunque potrebbe tornarti utile un codice del genere:

codice:
Application.ScreenUpdating = False
' codice che devi eseguire
Application.ScreenUpdating = True