質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
87.20%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Word

Microsoft WordはMicrosoftが開発した業務用の文書生成用のソフトウェアです。

VBScript

VBScript(Visual Basic Scripting Edition)はMicrosftが開発したスクリプト言語であり、Visual Basicのサブセットです。

解決済

wordファイルをPDF化しパスワードをかけたい

manataku
manataku

総合スコア0

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Word

Microsoft WordはMicrosoftが開発した業務用の文書生成用のソフトウェアです。

VBScript

VBScript(Visual Basic Scripting Edition)はMicrosftが開発したスクリプト言語であり、Visual Basicのサブセットです。

2回答

0評価

0クリップ

6956閲覧

投稿2017/12/05 08:55

フォルダの中にwordファイルが複数あります。
このファイルをPDF化しパスワードをかけて保存するvbsを作成したいのですが、
パスワードをかける処理が分からずアドバイス頂けないでしょうか。

ファイル名の一部をパスワードとして使用します。
フォルダ名:wordtoPDF
ファイル名:[日本語][パスワード].pdf

参考にしたサイト
https://digitanu.com/71

savas実行時にファイル名の一部をパスワードとして指定できるようにしたいのですが、
調べる限りここでパスワードを付けて保存はできないことまでは分かりましたが、
他に方法がないか探しております。

Dim FS, objWord, objDoc, objArgs, FileName, FolderName '実行時の引数を取得 Set objArgs = WScript.Arguments If objArgs.Count=0 Then MsgBox "Wordファイルをドラッグしてください。" WScript.Quit End If Set FS = CreateObject("Scripting.FileSystemObject") Set objWord = CreateObject("Word.Application") objWord.Visible = false j = 0 For Each FileName In objArgs FolderName = FS.GetParentFolderName(FileName) Select Case LCase(FS.GetExtensionName(FileName)) '拡張子がdoc, docxの時だけ処理 Case "doc","docx" Set objDoc = objWord.Documents.Open (FileName) '名前をつけて保存(PDFに) objDoc.SaveAs FS.BuildPath(FolderName, FS.GetBaseName(FileName) & ".pdf"), 17 objDoc.Close False j = j + 1 End Select Next objWord.Quit Set FS = Nothing Set objDoc = nothing Set objWord = nothing MsgBox j & "個のファイルを変換しました"

良い質問の評価を上げる

以下のような質問は評価を上げましょう

  • 質問内容が明確
  • 自分も答えを知りたい
  • 質問者以外のユーザにも役立つ

評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

気になる質問をクリップする

クリップした質問は、後からいつでもマイページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

  • プログラミングに関係のない質問
  • やってほしいことだけを記載した丸投げの質問
  • 問題・課題が含まれていない質問
  • 意図的に内容が抹消された質問
  • 過去に投稿した質問と同じ内容の質問
  • 広告と受け取られるような投稿

評価を下げると、トップページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

まだ回答がついていません

会員登録して回答してみよう

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
87.20%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問

同じタグがついた質問を見る

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Word

Microsoft WordはMicrosoftが開発した業務用の文書生成用のソフトウェアです。

VBScript

VBScript(Visual Basic Scripting Edition)はMicrosftが開発したスクリプト言語であり、Visual Basicのサブセットです。