'セルに値を入力する
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


コメント