日々の雑感

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

バスクリン

先日の日記に「バスクリン」がどうのこうのと書いた。 「もしかしてバスクリンは風呂釜洗いの洗剤だっけ? 入浴剤じゃなくて?・・・」 それを昨日、寝る前に思い出し、気になった。 眠れなくなってきた。 ネッ …

no image

PHSを機種変更

PHSを機種変更した。 京セラWX300K。 http://d.memn0ck.com/index.cgi?WX300K パソコンサイトが見られるので便利便利。 35万画素カメラは結構画質がいい。 毎 …

no image

GW

GWは、のとじま水族館と、七尾の青柏祭(せいはくさい)に行った。 のとじま水族館は、5月5日は子供の日で、子供無料。 今年できたばかりのイルカの泳ぐトンネル水槽が、目玉。 実際来てみると、大迫力で、こ …

no image

富山市ファミリーパーク

 今日はファミリーパークで凧作りのイベントがあったので親子で行ってきた。 餅つきとその振る舞いもあり、心身ともに満喫。 また、初めてホンモノの「里ノ助」をみた(着ぐるみ)。 パークのイメージキャラで …

no image

“わたしのオアシス”は「お風呂」がトップ

http://www.itmedia.co.jp/survey/articles/0505/16/news057.html (ITmedia Survey:お疲れ“わたしのオアシス”は「お風呂」がトッ …