1

ActiveXボタンがいくつか付いたWord文書があります。これらのボタンの1つを押すと、次のように、対応するPDFが表示されたユーザーフォームがポップアップ表示されます。

ここに画像の説明を入力してください これはまさに私が望む振る舞いです。ただし、これが機能するためには、docという単語のユーザーが各PDFを自分のマシンにも保存する必要があるという問題があります。ボタンの1つのコードは次のとおりです。

Private Sub AC1Button_Click()

    DisplayForm.AcroPDF1.LoadFile ("C:\Users\arose\Desktop\Security Control Doc\Sub PDFs\AC1.pdf")
    DisplayForm.Show

End Sub

ご覧のとおり、パスはハードコーディングされています。大量のPDFを一緒に配布することなく、このワードドキュメントを配布できる必要があるため、次のような方法でPDFをワードドキュメントに埋め込む方法はありますか。 VBAからアクセスできますか？

ここで、どのオフィスドキュメントにもPDFを埋め込むのはかなり簡単であることがわかりました。そして私はそれを試しました：

ここに画像の説明を入力してください

しかし、ユーザーフォームに表示するために、VBAコードでそのPDFオブジェクトにアクセスする方法がわかりません。

どんな洞察もありがたいです、ありがとう！

4

1 に答える 1

2

ファイルを埋め込みます（そして、ファイルがドキュメントを引き継ぐのを防ぐためにアイコンとして表示します）

ドキュメントの最初のOLEオブジェクトをアクティブ化するには、 

ThisDocument.InlineShapes(1).OLEFormat.Activate

コマンドです。

于 2012-09-10T18:46:46.967 に答える