【エクセルマクロ】保存先のフォルダパスを変数格納して使用:コピペで使えるコード

VBA-保存先のフォルダパスを変数格納して使用-アイキャッチ エクセルマクロで効率化する

エクセルマクロで、保存先のフォルダパスを変数格納して使用するVBAコードをご紹介します。

このページのマクロコードは、コピペで使えます。
ぜひお試しください!

保存先のフォルダパスを変数格納して使用

以下のマクロを実行すると、変数で指定したフォルダにファイルを保存します。


Sub ファイルの保存先を変数代入()

Dim Change_Name As String
Dim SavePath As String
    
    '対象の日付
    SavePath = "C:\テスト"
    Change_Name = "サンプル"
    
    'ファイル保存
    ActiveWorkbook.SaveAs Filename:=SavePath & "\" & Change_Name, _
     FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

End Sub

 

マクロ実行後

変数に格納したパスにファイルを自動保存します。


 

保存先のフォルダパスを変数格納して使用(セルにパス入力)

以下のマクロを実行すると、保存先をセル値に入力してファイルを保存します。


Sub ファイルの保存先を変数代入()

Dim Change_Name As String
Dim SavePath As String
    
    '対象の日付
    SavePath = Range("G1")
    Change_Name = Range("G2")
    
    'ファイル保存
    ActiveWorkbook.SaveAs Filename:=SavePath & "\" & Change_Name, _
     FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

End Sub

 

マクロ実行後

変数に格納したパスにファイルを自動保存します。


 

保存したファイルです。

 
 
この記事がお役に立ちますと幸いです。
 

【エクセルマクロ】名前を付けて保存処理を自動化:超便利8選
...

 

「プログラマーの本気がExcelを覚醒させる 超絶ExcelVBA」
ExcelVBAでワンランクアップできる書籍
具体的で応用が利く技をたくさん掲載