Escreva uma macro VBA assim:
Sub temp()
Range("A1:G11").Select
Selection.Copy
'Modify this part to loop over contents of your choice
Range("J17:S35").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
'Modify upto this
End Sub
Agora, modifique o componente de colagem dessa macro para fazer um loop sobre o conteúdo de sua escolha.