ブックを名前を付けて保存する ｜ 100本ノック

ブックに名前をつけて保存するマクロ/VBAです。

Sub Sample_ブックを名前を付けて保存する()
  ThisWorkbook.SaveAs "C:\ブックの名前.xls"
End Sub

「ThisWorkbook」とは、文字通り”このブックファイル”という意味です。

SaveAsメソッドの引数として、パスと名前を指定します。

Cドライブが無い場合、また、同じ場所に同じ名前のファイルがあると上書きするかどうかのメッセージを表示します。

問題がなければ、何もメッセージを表示せず、ブックファイルを保存します。

 

---