エクセルマクロコードについて教えてください。 下記コードでデスクトップへPDFで保存できるようになったのですが、

エクセルマクロコードについて教えてください。 下記コードでデスクトップへPDFで保存できるようになったのですが、 保存する前にPDFを画面に出力?表示するコードを追記したいです。 ご教授の程よろしくお願いいたします。 Sub PDF() ' ' PDF Macro ' ' Dim MyName As String MyName = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\" ActiveSheet.ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:=MyName & ActiveSheet.Name & ".pdf" End Sub

Visual Basic15閲覧xmlns="http://www.w3.org/2000/svg">25

ベストアンサー

0

おそらく、できたPDFを表示したいということではないでしょうか。そうだとしたら、引数に OpenAfterPublish:=Trueを追加してみてください。

ご回答ありがとうございます。 申し訳ございません。 コードのどこに追記したら、よろしいでしょうか。 初心者で申し訳ございません。 ご教授願います。

ThanksImg質問者からのお礼コメント

ありがとうございました。 解決できました。 ご回答感謝申し上げます。

お礼日時:9/28 8:02