vba - セル範囲を右にシフトする方法

Question

誰かが定義されたセル範囲を1列右にシフトするのを手伝ってくれますか? 私が定義する場合

rng = B2:B3

B2:B3 の値を B3:B4 に移動するコードが必要です。

これが私がこれまでに持っているものであり、これはどれも機能しません。3 行目でエラーが発生します。

Dim rng As Range
Set rng = Range(DataSheet.Cells(arr(z)(1), 2), DataSheet.Cells(arr(z)(1), LastCol))

rng.Insert Shift:=xlShiftToRight '(i tried this first)
 or
rng.Offset(0, 1).Select '(I tried this second and this also did not work)

Answer 1

rng.Cut rng.Cells(1).Offset(0,1) 'assuming you really mean to move right