#618 フォームにPDFファイルを表示するには? フォーム、VBA

Accessでは、その標準機能としてレポートなどをPDFファイルにエクスポートすることができますが、フォーム内にPDFファイルを表示するための標準コントロールはありません。しかし、いわゆる”ActiveX コントロール”と呼ばれる外部のコントロールを利用することによって、その機能を実装することができます。

もちろんそのパソコン内にPDFファイル表示用のコントロールがインストールされている必要がありますが、「Adobe Reader」をインストールすることによってそのコントロールもセットアップされています。昨今ではAdobe Readerは標準装備といえるソフトですので、多くのパソコンでそのまま使える方法と思います。


そのフォームデザインは次のような手順で行います。
  1. 空のフォームを作成します。


  2. リボンより[コントロール]-[ActiveX コントロール]を選択します。


  3. 「ActiveX コントロールの挿入」ダイアログが表示されたら、「Adobe PDF Reader」を選択して[OK]ボタンをクリックします。


  4. それによって「Adobe PDF Reader」のコントロールがフォームのデザイン上に挿入されます。


  5. コントロールの位置やサイズを任意に調整するとともに、ここでは[表示]ボタンのクリックでPDFファイルを表示するものとし、そのボタンを配置します。


  6. そのボタンのクリック時イベントプロシージャを次のように記述します。
    なおここでは、「Adobe PDF Reader」コントロールの名前は「AcroPDF0」、コマンドボタンの名前は「cmd表示」、また表示するファイルのフルパスは「C:\tmp\leafbm.pdf」に固定としています(実際にはファイル選択ダイアログで選択したりといった付随機能を付けることになると思いますが)。また、「src」が、表示するPDFファイルのパスを指定する「Adobe PDF Reader」コントロールのプロパティとなっています。

    Private Sub cmd表示_Click()

      Me!AcroPDF0.src = "C:\tmp\leafbm.pdf"

    End Sub


実行例:


| Index | Prev | Next |



T'sFactory
Accessで動く生産管理DB
Ureru Express
Webで使う販売顧客管理
Access開発&アドバイス
DB開発やテクニカルアドバイス
Copyright © T'sWare All rights reserved