Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


5430 / 76732 ←次へ | 前へ→

【76915】Re:PDFのプロパティの取得の仕方
発言  マナ  - 15/4/11(土) 20:39 -

引用なし
パスワード
   もっと削除してもよかった?

Sub test3()
  Dim filePath As String

  filePath = "C:\Users\hage\Desktop\test.pdf"

  Dim pdDoc As Object
  
  Set pdDoc = CreateObject("AcroExch.PDDoc")

  pdDoc.Open (filePath)

  Dim strTitle As String
  strTitle = pdDoc.GetInfo("Title")

  MsgBox (strTitle)

  pdDoc.Close

  Set pdDoc = Nothing

End Sub


逆に、元のコード(test)を最小限の修正ですませる場合は、
下記1行を

strTitle = pdDoc.GetInfo("Title")

strTitle = avDoc.getpdDoc().GetInfo("Title")

782 hits

【76913】PDFのプロパティの取得の仕方 K 15/4/11(土) 0:57 質問[未読]
【76914】Re:PDFのプロパティの取得の仕方 マナ 15/4/11(土) 16:12 発言[未読]
【76915】Re:PDFのプロパティの取得の仕方 マナ 15/4/11(土) 20:39 発言[未読]
【76922】Re:PDFのプロパティの取得の仕方 K 15/4/13(月) 20:16 お礼[未読]
【76923】Re:PDFのプロパティの取得の仕方 マナ 15/4/13(月) 20:27 発言[未読]
【76929】Re:PDFのプロパティの取得の仕方 K 15/4/13(月) 22:03 お礼[未読]

5430 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free