日々の雑感

Power Automate for desktopでPDFを作成するにはWordとVBScriptとの合わせ技で

投稿日:

自分の環境の現バージョン(2.49.17)のPower Automate for desktopでは、ファイルをPDFに出力する機能が足りていない。

きっと将来はMSが何とかしてくれるとして、いまのVBScriptで以下のコードを記述して実行することが最適と思う。

Dim wordApp, doc, srcFile, dstFile

‘ 変換元のHTMLファイルを指定
srcFile = “C:\Users\test\Downloads\test%RandomText%.html”

‘ 変換後のPDFファイルを指定
dstFile = “C:\Users\test\Downloads\test%RandomText%.pdf”

‘ Wordアプリケーションを作成
Set wordApp = CreateObject(“Word.Application”)

‘ HTMLファイルを開く
Set doc = wordApp.Documents.Open(srcFile)

‘ PDFとして保存
doc.SaveAs2 dstFile, 17 ‘ 17はPDF形式の定数

‘ ドキュメントを閉じる
doc.Close

‘ Wordアプリケーションを終了
wordApp.Quit

自分のケースでは、ドキュメント文書のところどころの字を大きくしたり、表を使ったりしたいという要望があったので、HTMLファイルを作って書式を施し、それをPDF化。

-日々の雑感

執筆者:

関連記事

no image

デロンギ

デロンギという文字が目に入る。 え、ギロチン? と目を疑う。 お、やっぱり勘違い。 デロンギはヒーターなど白物家電を作っているイタリアのメーカー。 さては小学生のときに姉が持っていたので読んだ「ベルサ …

ザ・ブルーハーツ

ブルーハーツのベスト盤をレンタルした。 ブルーハーツで思い出すのは、 「ブルーな気分のときはブルーハーツを聴くんだ・・・」 とつぶやいた、前にいた会社の同僚。 私が会社を辞める日、彼はブルーハーツのC …

no image

温泉

会社から帰ってきてパソコンの電気をつける。 またしてもこんな絵が。 誰だ、作ったの? しかし、いいなあ。 こんなことしたいなあ。 温泉行ってないなあ、だいぶ長いこと。

no image

はやりの

仕事から帰宅。 机の上に郵便物。 差出人は、東京地方裁判所! 「な、なんだ?」 物々しさに怯んだ。 封を切って中を開けてみると「平成電電の債権がどうとか」という書類が入っていた。 それを確認して、安心 …

no image

伏木港まつり

伏木の万葉埠頭に、海上自衛隊の護衛艦「はまゆき」と「みねゆき」というのが来ていて乗船できるというので、行ってきた。 私らが埠頭に到着したのが、きりぎり4時。 乗船タイムは4時までで、あと1分遅れたら乗 …