【1 OSの種類 　 　 　 　 .】 Windows7
【2 Excelのバージョン 　 】 Excel2013
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可

指定したシートを、入れたい文字でPDF形式で保存したいと考えています。
具体的には、a-見積書-20180220-20180228.pdfのような感じで
aは参照するセルの内容によって可変。
20180220と20180228は参照するセルによって可変で、当該セルは和暦表示(例：平成30年2月20日)としています。

また、保存先は作業ブックと同じディレクトリをデフォルトととし、
重複する名前のファイルがあった場合の確認ダイアログを表示させたいと考えています。

ExportAsFixedFormat Type:=xlTypePDF、Application.DisplayAlertsの使用と
FilenameをString宣言するまでは、調べてわかったのですがファイル名の日付への反映がうまくいきません

よろしくお願いします。