'セルに値を入力する Sub Example() Range("A1").Value = Date Range("A2").Value = "angela" End Sub
'カット&ペースト Sub Example() Range("A1").Cut Range("A2").Select ActiveSheet.Paste End Sub
'コピー&ペースト Sub Example() Range("A1").Copy Range("A2").PasteSpecial Paste:=xlPasteValues End Sub
'セルを挿入する Sub Example() Range("A1").Insert Shift:=xlDown End Sub
'セルを削除する Sub Example() Range("A1").Delete Shift:=xlUp End Sub
'セルをクリアする Sub Example() Range("A1").Clear End Sub
コメント