EXCELを使用していて、毎回ファイル名に”年度+当日の日付”を入力しています。

エクセルのマクロでの実行により、ファイル名に日付を入れて保存できますか？ - Yahoo!知恵袋

こちらのYahoo知恵袋に類似質問があり、そのものズバリのマクロが紹介されています

次のようなマクロを実行すると、ファイル名の先頭に日付を付加してダイアログを表示できます。

Option Explicit

Public Sub 日付を付けての保存()
    
    Dim fname As String
    Dim iniFileName As String
    iniFileName = Format(Now, "yyyymmdd") & ActiveWorkbook.Name

    fname = Application.GetSaveAsFilename( _
                 InitialFileName:=iniFileName _
               , FileFilter:="エクセルファイル(*.xls),*.xls" _
               , FilterIndex:=1 _
               , Title:="名前を付けての保存（日付情報付加）" _
               )
        
        
    If fname <> "False" Then
        ActiveWorkbook.SaveAs Filename:=fname
    End If
        
End Sub

これを、

アドオン

http://takashixxx.blog88.fc2.com/blog-entry-37.html

として登録してあげれば良いと思います。

（または、PERSONAL.XLS）