VBA内でファイル名を自動的に更新

Question

私は、インベントリレポート「今日の日付」という名前のマクロで参照されるExcelファイルを持っています。 （Inventroyのレポート11_01_2017）私は、VBAが現在の日付のファイルを常にその名前で参照する方法を見つけようとしていました。

Answer 1

現在のファイル名に現在の日付を加えたい場合は、

あなたの代わりに /の _と日付が必要な場合は

Sub t() 
Dim fileName As String, curDate As String 
curDate = Date 
fileName = ActiveWorkbook.Name 
fileName = Left(fileName, InStr(fileName, ".") - 1) 
fileName = fileName & " " & curDate 
Debug.Print fileName 
End Sub 

あなたが追加することができます。

curDate = WorksheetFunction.Substitute(date, "/", "_")