セルを右へシフトして移動

トップページ（目次）

134.セルを右へシフトして移動

Sub セルを右へシフトして移動()

    '「右へシフトして移動」
    Range("A1").Cut
    Range("B2").Insert Shift:=xlToRight
    
End Sub