エクセル VBAについて質問です。Sub 見積書保存()'開始時の実行確認'開始確認 = MsgBox(\u0026quot;保存しますか？\u0026quot;, vbYesNo)If 開始確認 = vbNo Then Exit Sub '「いいえ」なら終了''保存するブックの名前を作成Dim a, B, C, D, E, G, Ha = Range(\u0026quot;M3\u0026quot;).Text 'ブックの名前B = Replace(Hi, \u0026quot;/\u0026quot;, \u0026quot;_\u0026quot;) '日付C = Range(\u0026quot;A4\u0026quot;).TextD = Range(\u0026quot;P1\u0026quot;).TextE = Range(\u0026quot;R1\u0026quot;).TextG = D \u0026amp; E \u0026amp; \u0026quot;-\u0026quot; \u0026amp; C \u0026amp; \u0026quot;-\u0026quot; \u0026amp; aH = Path \u0026amp; G \u0026amp; \u0026quot;.pdf\u0026quot; ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=\u0026quot;F:\\G.pdf\u0026quot;, _ Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _ :=False, OpenAfterPublish:=FalseMsgBox \u0026quot;保存しました\u0026quot;ThisWorkbook.SaveEnd Sub上記のようなマクロを作成しました。ですが、ブックの名前が変わりません。どのように変えたら保存するときにブック名がかわりますか？