Kopiere celler og indsætte speciel med VBA

Hey
Lille simpelt spørgsmål. Jeg vil gerne kopierer rækkerne A2 til P67 og indsætte dem i A68 som værdier.
Det er fordi jeg har nogle værdier i rækkerne ovenfor som hverdag skal kopieres og indsættes umiddelbart under tabellen således at alle tidligere værdier rykker 68 linjer ned. SÅledes er det altid gårsdagens tabel der står lige umiddelbart nedenunder dagens tabel.

Jeg har følgende kode der virker næsten efter hensigten men tror ikke den er optimal.

Sheets("Hovedark").Activate
    Range("A2:P67").Select
    Selection.Copy
    Rows("68:68").Select
    Selection.Insert Shift:=xlDown
    Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats

Eneste problem er at jeg får en dialogbox om jeg vil overskrive værdierne som jeg så manuelt er nødt til at klikke ja til. Efter dette så er rækkerne indsat korrekt.
Er der en nemmere måde hvorpå jeg kan opnå samme resultat??