• 締切済み

ワークシート上のPDFファイルをVBAで印刷したい

エクセル2010です。 Worksheets("Sheet2").OLEObjects(1).Verb Verb:=xlVerbOpen で、エクセルのワークシート上に埋め込んだPDFファイルを開くことはできました。 これで開いたPDFを手動ではなく自動でPrintし、Acrobatを終了させる方法があれば知りたいのです。 なお、残念ながら有料のAcrobatはありません。

みんなの回答

  • kon555
  • ベストアンサー率52% (1750/3357)
回答No.1

VBAでpdf印刷自体はできるようですね。こちらを参考にしてみては。 https://www.sejuku.net/blog/99169

emaxemax
質問者

お礼

早速ありがとうございます。 ただ、ご教示の方法はファイルのフルパスを指定して印刷指示を出すようです。 エクセルのワークシート上に埋め込んだPDFファイルを指定して印刷指示する方法がわかりません、

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. Excel（エクセル）

関連するQ&A

  • エクセルVBAでワークシート上のPDFをPrint

    https://okwave.jp/qa/q9367116.html の関連質問です。 Worksheets("Sheet2").OLEObjects(1).Verb Verb:=xlVerbOpen で、ワークシート上に埋め込んだPDFファイルを開くことはできました。 今度は、これで開いたPDFを手動ではなく自動でPrintし、Acrobatを終了させる方法があれば知りたいのです。 欲張ってすみません。よろしくお願いします。

  • エクセル2010のVBAでPDFを開きたい

    エクセルのワークシートSheet2にPDFのファイルを挿入しました。アイコン表示になっています。 Sheet1にあるボタンでこのPDFを開こうと思い、見よう見まねで Sub TEST() Worksheets("Sheet2").OLEObjects(1).Verb Verb:=xlPrimary End Sub としたところ、PDFは開くことはひらくのですがアクティブになってくれません。 Worksheets("Sheet2").OLEObjects(1).Activate　に変えてもおなじです。 PDFではなくワード文書を張り付けた時には上記のコードでアクティブになってくれたのですが。 どうすればPDFをアクティブに、表に見えるようにできるでしょうか？

  • PDFファイルを印刷し終了するには

    VB 2005で開発しています PDFファイルを印刷し印刷が終わったらAcrobatを終了させたいのですが、 方法が分かりません。 Dim proc As New Process proc.StartInfo.FileName = "z:\book1.pdf" proc.StartInfo.Verb = "Print" proc.StartInfo.CreateNoWindow = True proc.Start() この後、印刷が完了した後Acrobatのみ残ってしまいます。 印刷が終了した時点でAcrobatを終わらせる方法はないでしょうか。 ご教示お願いします。

  • いきなりPDFでExcelファイルをPDF化すると、ワークシートとグラフシートが別ファイルになる

    いきなりPDF Professional 2を使って、グラフシートを含んだExcelファイルをPDF化しようとすると、ワークシートとグラフシートが一度に１つのPDFファイルにできません。 元のExcelファイル：Excel2000で作成されたもの OS：Windows2000 Excel：2000、2002で検証 Excelファイルで左からワークシート、グラフシート、ワークシートの順であるとすると、その都度PDFファイルの保存場所を尋ねるウィンドウが開き、そこまでの分で１つのPDFファイルになります。つまりこの例では１つのExcelファイルが３つのPDFファイルになってしまいます。 何か制約があるのでしょうか？

  • エクセルのシートを1つのPDFファイルにする方法

    wordやpowerpointでは印刷でAcrobatを指定すれば1つのPDFファイルになりますが、エクセルでシートが複数ある場合で、印刷→Acrobatを指定しても1つのPDFにならず複数枚のPDFになります。複数のPDFファイルを1つのPDFファイルにはAcrobatの機能でできますが、面倒なので複数シートを1つのPDFファイルにする方法をご存じの方がおられましたら教えていただければと思います。

  • PDFファイルの印刷

    Adobe AcrobatのPDFファイルをエクセルに貼付け印刷したのですが、エクセルのシートに書き込んだ文字は綺麗に印刷されますが、PDFファイルの文字が薄く綺麗に印字されません。どのようにしたら文字が綺麗に印刷されますか？

  • エクセルVBAでワード文書をPDF保存

    質問の仕方が悪かったようですので先日の質問 https://okwave.jp/qa/q9876787.html を取り消し、再度質問させていただきます。 エクセル2016のワークシート上にオブジェクトの挿入でワードの文書ファイルをアイコンで貼り付けています。VBAでこの文書ファイルを開き、PDFとして保存しようと思います。 見よう見まねで以下のようなコードを書いてみまた。 '参照設定　Microsoft Word 16.0 Object Library Sub test01() Dim objWord As Word.Application Set objWord = CreateObject("Word.Application") objWord.Visible = True Dim objDoc As Word.Document Dim FileName As String FileName = Application.GetSaveAsFilename(, "PDFファイル,*.pdf", , "PDF保存") Set objDoc = Worksheets("Sheet1").OLEObjects(1).Verb(Verb:=xlVerbOpen) objDoc.ExportAsFixedFormat OutputFileName:=FileName, ExportFormat:=wdExportFormatPDF objDoc.Close End Sub これで、文書ファイルは開くのですが、「オブジェクトが必要です」のエラーがでて、Set objDocがEmptyのままPDF保存ができません。どのように直せばいいのでしょうか？ ご教示ください。

  • PerlでExcelのワークシートを同じファイル内にコピーしたりワーク

    PerlでExcelのワークシートを同じファイル内にコピーしたりワークシートの名前を変更することは可能でしょうか？ 環境は、WindowsXPpro、IIS5.1、PerlV5.10でWin32_OLEモジュールを使用しています PerlでExcelのワークシート内セルに書き込み・セルからの読み出しはできています。 VBAではワークシートをコピーする場合は、 「Worksheets("Sheet1").Copy After:=Worksheets("Sheet3")」 でコピーできるようですが、 Perlではどう記述すれば良いか分かりません。 Perlではワークシートをコピーしたりワークシートの名前を変更することは出来ないのでしょうか？ よろしくお願いします。

    • ベストアンサー
    • Perl
  • ExcelのファイルをPDF化したいのですが・・・

    9つのシートがあるExcelのファイルをAcrobatでPDF化したいのですが Excelでその全てのシートを選択してDistillerでPDF化しても Acrobat側では最後の1シートしかPDF化されません。 Excel側で印刷プレビューで確認するとちゃんと9ページとなっているのに。。 他のファイルは問題なくPDF化出来ているのですがそのファイルだけ どうしても出来ないんです。 あたしのやり方自体が間違っているんでしょうか？？

  • VBAによるPDF印刷について

    １つのファイル内に、A0からA4サイズまでのどれかの図面ファイルがマルチページで数ページ入っています（サイズ並びはランダム）。印刷時に各サイズ毎でまとめて印刷したいのですが（どのページにどのサイズかは判っています）、その設定方法がわかれば教えていただきたく質問しました（最終的には自動化を目指しています）。よろしくお願いします。 例えば「1、2、3、7、9、11、12、14」ページを1度に印刷する場合、Acrobatで印刷ダイアログを表示した際に「印刷範囲」として「1-3,7,9,11-12,14」と記載できます。通常（PDF以外）の印刷設定では開始と終了ページ、部数の設定方法は確認出来ていますが、Acrobatでの印刷ダイアログへの設定方法がわかりません。 ① そもそもPDFファイルがオープンしていれば印刷ダイアログはAcrobatのものが表示されるのか？。 ② 表示されないのであればどうすれば表示できるのか？。 ③ 表示された場合での各項目の設定方法は？。 ④ ①〜③が出来ない場合、別に方法はあるのか？。 色々とネットを検索しているのですが“これ”と思ったものが見つからずで…。検索の方法が悪いのかもしれませんが…。ここのサイトがわかりやすいとか、この参考書が良いとかの情報もあれば教えていただけると助かります。 サイズとページの取得については、他者が作成したエクセルVBAを利用しています（処理コメント説明が一切無いので解析に苦労しながら改造している状態です）。VBA以外も考えたのですが、とりあえずはVBAがらみで今四苦八苦しています。PDFを扱わない処理は経験しているのですが…。出来なければ開始と終了ページで回数を回すしかないのかと。なお、Acrobat有償版は入っています。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する