【Excel】ファイル保存時にVBA実行

実行ボタンの配置が面倒な時などに。

' ファイルを保存したとき実行するマクロ
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  MsgBox "ファイル保存時"
End Sub