質問: VBA初心者なので教えて頂きたいです。
回答: セル位置が解りません A1: 2021年 B1: 4月 C1: 新宿区 のプルダウンあるとします。 FileCopyを使うのがいいと思います。 ボタンの表示内容から、ファイル名を決めています。両方共このマクロを登録して下さい。ボタンを使わないとエラーになります。 最後の、Openは必要なら入れでください。 Option Explicit ' Sub Macro1() Dim PathName As String Dim FileName As String ' PathName = "D:\Test\" & [A1] & "\" & [B1] FileName = PathName & "\【" & [C1] & "】見積依頼書 " & _ ActiveSheet.Buttons(Application.Caller).Text & ".xlsx" FileCopy PathName & "\【原紙】見積依頼書.xlsx", FileName Workbooks.Open FileName End Sub