This method opens a PDF in Acrobat Exchange and jumps to a known bookmark

This code sample is posted here for the general benefit of the PDF development community. Attribution and usage guidelines are as noted in the code source; please respect the wishes of the author when using this code.

Option Explicit ' Force variable declaration
' Author : Planet PDF
' Date : 7 November 1998
' Description: JumpToBookmark
' This vb method uses IAC to open a PDF in Acrobat Exchange and jump to a particular bookmark
' This method / function should be extended to suit the requirements
' of an organisation

Private Const PDF_FILENAME = 'c:codecutsjumptobookmark.pdf

Sub JumpToBookmark()

Dim AcroExchApp As Object
Dim AcroExchPDDoc As Object
Dim AcroExchAVDoc As Object
Dim AcroExchPDBookmark As Object
Dim strFileName As String
   Set AcroExchApp = CreateObject('AcroExch.App')
Set AcroExchAVDoc = CreateObject('AcroExch.AVDoc')
Set AcroExchPDBookmark = CreateObject('AcroExch.PDBookmark')

' Show the Acrobat Exchange window
    AcroExchApp.Show

' Set the filename to be opened
strFileName = PDF_FILENAME

' Open the PDF containing the bookmark
AcroExchAVDoc.Open strFileName, vbNull

' Get the PDDoc from the AVDoc for passing to GetByTitle
Set AcroExchPDDoc = AcroExchAVDoc.GetPDDoc

' Get the bookmark from the document
AcroExchPDBookmark.GetByTitle AcroExchPDDoc, 'Jump To Me'

' Jump to the specified bookmark
AcroExchPDBookmark.Perform AcroExchAVDoc

End Sub