vba - 異なるワークシートからのデータのコピーと貼り付け

Question

VB スクリプトを使用して、Excel シート 1 のデータをシート 2 にコピーしようとしています。問題は、コピーしたデータを A1 から貼り付け、A1 の現在のデータを新しいデータの一番下にプッシュしたいことです。これまでのところ、私のコードは権利を超えています。以下をご覧ください。

Set objExcel = CreateObject("Excel.Application")
Set objWorkBook = objExcel.Workbooks.Open(CurrentDirectory & "\test.xlsx")
objWorkbook.Worksheets("Sheet1").Range("A1:B9").Copy
objWorkbook.Worksheets("Sheet2").Range("A1").PasteSpecial
objExcel.ActiveWorkbook.Save
objExcel.Quit