excel - データを移動して名前付き範囲にコピーする

Question

あるシートから別のシートにデータをコピーしようとしています。

2 番目のシートでは、行のエントリを下に移動する必要があります

シート 2 にコピーするときに、既存のデータを下に移動したいと考えています。

オフセット関数を使用しようとしましたが、混乱して正しく記述できているかどうかわかりません。

Sub MoveData()
  If ThisWorkbook.Worksheets(1).Shapes("Check Box 1").OLEFormat.Object.Value = 1 Then
     Range("c2:c10").Select
     Selection.Cut
     Sheets("Sheet2").Select
     Range("test").Select
     ActiveSheet.Paste
     Range("test").Select
  End If
End Sub

テストは、名前付き範囲であることを意図しています。

これを修正する方法がわかりません。