kolommen overnemen naar ander bestand

[patje8]

Ik heb 2 bestanden: stock test en voorbereiding pekels test.

Het is de bedoeling dat in het bestand stock test de kolommen (T3:AC7) worden gekopieerd naar het bestand voorbereiding pekels test (G15).
Dit lukt perfect via de macro knop "Overnemen naar pekels" in bestand Stock test.

Sub Macro1()

    Range("T3:ac80").Select
    Selection.Copy
    Windows("Voorbereiding Pekels.xlsm").Activate
    Range("G1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Windows("WEKELIJKSE STOCK 2022.xlsm").Activate
End Sub

Het probleem is echter dat de week erna in het bestand stock test de kolommen (T3:AC7) worden overschreven en dan moet de macro knop deze overnemen naar Voorbereiding Pekels test vanaf kolom Q enz.

Wie kan me hierbij helpen?
Alvast bedankt.

 

[Haije]

Sub Macro1()

Range("T3:ac80").Copy
Windows("Voorbereiding Pekels.xlsm").Activate
   if Range("G1")="" then 
      Range("G1").Select
   else
      Range("G1").end(xlright).offset(,1).Select
   end if
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Window("WEKELIJKSE STOCK 2022.xlsm").Activate
End Sub