AcroExch.PDBookmark: SetTitle メソッド

TOP > AcroExch.PDBookmark > SetTitle      [...]


説明

現在PDBookmarkオブジェクトが扱っている「しおり」の文字列を変更します。

よって事前に検索(GetByTitle)しておく必要があります。

 

形式

VARIANT_BOOL SetTitle(BSTR szNewTitle);

 

引数

  1. 第1引数(BSTR szNewTitle) :
    変更した文字列。

 

戻り値

  • True(-1) : 成功。
  • False(0) : 失敗。又はPDFドキュメントのセキュリティ上で変更できないか、
    アプリケーション(Acrobat Reader)がサポートしていない。

 

動作するバージョン

Version Adobe
Acrobat
備考
4
-
Acrobat 4.0    ※Windows 98SE + Excel 2000
5
-

Acrobat 5.0.5
6
-

Acrobat 6.0.3 Pro
7
-
Acrobat 7.0.9 Pro
Acrobat 7.1.4 Pro
8
OK
Acrobat 8.1.2 Pro
9
-
Acrobat 9.3.2 Extended
10
-
Acrobat X (10.1.8) Extended
11
-
Acrobat XI (11.0.04) Extended
  • OK = 動作する。
  • NO = 動作しない。 戻り値が0を返す。
  • - = 未確認。

 






サンプル:ExcelのVBA

 

説明:「しおり」の文字列を変更します。

  • F8キーでステップ実行しながら動作確認する。
  • 参照設定を事前にする。

 

Sub AcroExch_AcroPDBookmark_SetTitle()

    Dim objAcroApp      As New Acrobat.AcroApp
    Dim objAcroAVDoc    As New Acrobat.AcroAVDoc
    Dim objAcroPDDoc    As New Acrobat.AcroPDDoc
    Dim objAcroPDBookMark As Acrobat.AcroPDBookmark
    Dim lRet            As Long
    
    'PDFファイルを開いて表示する
    lRet = objAcroAVDoc.Open("E:¥Test01.pdf", "")
    'PDDocオブジェクトを取得する
    Set objAcroPDDoc = objAcroAVDoc.GetPDDoc
    'objAcroPDBookMarkオブジェクトの作成(インスタンス化)
    Set objAcroPDBookMark = _
        CreateObject("AcroExch.PDBookmark")
    '該当する「しおり」を検索する
    lRet = objAcroPDBookMark.GetByTitle(objAcroPDDoc, _
                    "HogeHoge")
    If lRet = True Then
        'しおりが見つかった。
        'このしおりの文字列を変更する
        lRet = objAcroPDBookMark.SetTitle( _
                        "NEW BookMark TITLE ")
    End If
    
    'PDFファイルを保存して閉じます。
    'lRet = objAcroAVDoc.Close(0)
    'PDFファイルを保存しないで閉じます。
    lRet = objAcroAVDoc.Close(1)

    'Acrobatアプリケーションを終了する。
    lRet = objAcroApp.Hide
    lRet = objAcroApp.Exit

    'オブジェクトを強制開放する
    Set objAcroPDBookMark = Nothing
    Set objAcroPDDoc = Nothing
    Set objAcroAVDoc = Nothing
    Set objAcroApp = Nothing

End Sub

  

 

補足

  • 現在有り「しおり」を変更するです。新規追加はこのメソッドでは出来ません。
  • このPDBookmarkオブジェクトではしおりの新規追加機能は有りません。

 

動作確認環境

  • WindowsXP Pro(+ SP3) +
    Acrobat 8.1.2 Pro + Office 2003 + MicrosoftUpdate

 

戻る

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

CAPTCHA


出来るだけ早く返答する様には心がけています。
が、遅くなる時もありますのでご了承ください。


SAMURAI Plugin

コメントをする時は出来れば以下もお願いします。

  • OS名 バージョン
  • Acrobat バージョン
  • ツール(Excel等) バージョン
コメントにサンプルコードを入れるとエラーになる場合が有ります。その時はコードの前後に <code> ・・・</code> タグを入れてください。

This site uses Akismet to reduce spam. Learn how your comment data is processed.