マクロ覚書
新しいブックを作成する Workbooks.Add End Sub 上書き保存 Active Workbook. Save End Sub 名前を付けて保存 (ここではセルA2に入れた文字をファイル名として使う) Active Workbook. SaveAs Filename:= Dim BookName As String (ブックネームは次の変数が入りますよの意味) BookName=Range("A2").Value (ブックネームには”A2"セルと同じものが入りますの意味) End Sub セルに今日の日付を入れる(ここではセルA6) Range("A6").Select ActiveCell. FormulaR1C1 = "=TODAY()" (選択したセルにTODAYの関数を入れますよの意味) End Sub 画像を張り付ける ActiveSheet. Pictures. Insert( _ "C:\Users\Public\Pictures\Sample Pictures\ooo.jpg). Select (↑貼りたい画像のパス。\は半角の¥マーク。なぜちょっと日本仕様なのかナゾ) End Sub メッセージボックスを表示させる。 MsgBox "HELLO!"(入れたいメッセージ)