Excel VBAを使用して、既存のPDFファイルをMicrosoft print to PDFの形式で出力(PDF作成)したいと考えています。また、出力後PDFのファイル名には「変換後_」をつけることで、基ファイルと区別できるようにしたいです。
環境は、OS:Windows10、Excel:Microsoft Office2010、インストールしているPDFソフト:Adobe Reader DCです。
下記記述を試してみたところエラーが出てしまいました。
FilePath=基PDFファイルのディレクトリパス
FileName=基PDFファイルの名前
CreateObject("Shell.application").ShellExecute FilePath & FileName
ActiveWindow.PrintOut ActivePrinter:="Microsoft Print to PDF", PrintToFile:=True, PrToFileName:=FilePath & "変換後_" & Replace(FileName, ".pdf", "") & ".pdf"
ちなみに、下記記述でExcelのシートをMicrosoft print to PDFでPDF変換することはできました。
ActiveSheet.PrintOut ActivePrinter:="Microsoft Print to PDF", PrintToFile:=True, PrToFileName:=FilePath & "変換後_" & Replace(FileName, ".pdf", "") & ".pdf"
ご存じの方がいらっしゃいましたら、ご教示いただけますでしょうか。
宜しくお願い致します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) PDFファイルに日付を名前にして保存したい。 エクセル2019でワークシートに請求書のフォームを作り 2 2023/05/27 11:13
- Excel(エクセル) 【VBA】PDF出力に任意のファイル名前を付ける方法 3 2023/07/21 10:55
- Excel(エクセル) エクセルVBA、間違っているコード内容を正して頂けませんか? エクセルワークシートに納品書を作ったの 2 2023/08/02 21:13
- Excel(エクセル) エクセル2019でPDFファイル名に枝番号をつけたい。 アクティブワークシートを印刷した後の処理とし 4 2023/06/06 21:00
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/07/01 12:54
- PDF AutoCAD図面をPDF fileに変換した際、画像情報やブロック名はわかるのでしょうか。 1 2022/06/03 09:42
- PDF エクセルのVBAでファイルをpdfで保存するとソフトによっては開けなくなる 3 2022/06/08 10:20
- PDF PDF化するときのサイズについて 2 2023/07/15 10:16
- その他(プログラミング・Web制作) python OpenPyXLを使って出力結果をエクセルに書き込み 2 2022/06/04 19:46
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
microsoft print to pdf 保存先
その他(コンピューター・テクノロジー)
-
EXCEL VBAでPDFファイルを開いて印刷
Visual Basic(VBA)
-
VBからPDFファイル自動生成するには
Visual Basic(VBA)
-
-
4
ExcelVBAでPDFを閉じるソース
その他(Microsoft Office)
-
5
PDFファイルを開き、印刷し、閉じるマクロ
Visual Basic(VBA)
-
6
VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません
Visual Basic(VBA)
-
7
PDFファイルを開かずに印刷したい
Visual Basic(VBA)
-
8
VB6上から印刷ダイアログを表示させずにPDFを作成したい
Visual Basic(VBA)
-
9
エクセルvbaでdocuworksprinterの出力先を設定
Visual Basic(VBA)
-
10
excel マクロ PDF化の際のエラーについて
Visual Basic(VBA)
-
11
VBA PDFファイル印刷後のAcrobatReaderDCの起動画面を閉じたい
Excel(エクセル)
-
12
印刷ダイアログを表示させない方法
Visual Basic(VBA)
-
13
VBA PDFで保存するマクロで実行時エラー 1004
Visual Basic(VBA)
-
14
VBscriptでPDFファイルを直接印刷できるようにするためには?
Microsoft ASP
-
15
マクロで印刷時のポートについて
Access(アクセス)
-
16
エクセルVBAでPDFを作成したい
Visual Basic(VBA)
-
17
PDF 最小サイズ"で保存するマクロ"
PowerPoint(パワーポイント)
-
18
エクセルをPDFで保存し、ファイル名はA1セルを参照するVBAの記述を教えてください。
Excel(エクセル)
-
19
画像ファイル変換(Tiff→PDF)
Visual Basic(VBA)
-
20
EXCEL マクロに於ける プリンタ番号検索方法
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ひらがなから全角カタカナへの...
-
シャープ(#)の受け渡し
-
エクセル(Exsel)についての質...
-
gccでiconvを使った文字コード...
-
エクセルでの漢字(全角ひらが...
-
URLが日本語なのになぜ表示...
-
文字列が勝手にエスケープ文字...
-
SJIS->UTF8->SJISコード変換に...
-
Excel VBAでPDFファイルをMicro...
-
16進数の文字列を文章に変える
-
パイソンエラーについて
-
pythonエラー
-
全角入力
-
GoogleAppsScript文字列置換の...
-
全角/半角キーをSendkeys関数で...
-
住宅にカナを入力する際に丁目...
-
CSVファイルの中で、「 , 」カ...
-
VBA EXCEL あるセルの中の一...
-
バッチファイルの正規表現を利...
-
マクロを使ってフォルダー内に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel VBAでPDFファイルをMicro...
-
文字コードの%E3%80%とは何です...
-
CString から LPCTSTRの型に変換
-
SJIS->UTF8->SJISコード変換に...
-
Pythonについて。
-
Visual Studio プロパティペー...
-
r18文学賞は文字数ではなく、枚...
-
ローマ字からカナに変換する方...
-
エクセルでの漢字(全角ひらが...
-
日付をシリアル値に変換
-
テキストをhtml変換するには
-
VBScript 全角英数記号→半角英...
-
LINUX上でシリアル通信(C++)
-
漢字からカタカナ変換マクロ
-
VBScript文字列をSJISからUTF8...
-
Pythonについて。
-
gccでiconvを使った文字コード...
-
SQLのデータで半角カナを全角に...
-
【PHP】全角記号を半角記号...
-
CString型からdouble型への変換
おすすめ情報
すいません、記述を変更したので無駄な記述をしているころがありました。
(最初は”変換後”を拡張子の前につけようと思ってました)
Replace(FileName, ".pdf", "") & ".pdf"
→FileName
です。
そう思われますよね。そして、そういう需要がないから調べても出てこないのだとも思いました。
フォントの問題で今のところ解決できる方法がこれしかなかったので。