見積書シートのB18に文字がないと下のコードがうまくいくんですが、
文字が入るとファイルが保存できなくなります。
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\伏せます\Dropbox\PC\Desktop\見積をとる\【見積依頼先】追加工・メーカー・販売" & Worksheets("リスト").Range("B7").Value & "\To\【依頼書】" & Worksheets("見積書").Range("B18").Value & ".pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
どうしたらいいでしょうか。
前日まではセルに文字が入力されていても問題なく動いていたうえ、
まずマクロの記録からファイルのパスだけしか変えてないんです。
回答1件
あなたの回答
tips
プレビュー