IAC – Adding link annotation to a page

How to add a link annotation to the currently displayed page in Acrobat

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.

‘ *** Please note there does not appear to be a way

‘ *** to set the destination of any links created in this way

‘ To add a link annotation to the currently displayed

‘ page in Acrobat:

‘ It will be added as the first annotation in the page’s

‘ annotation array.

Dim AcroApp As CAcroApp

Dim AVDoc As CAcroAVDoc

Dim AVPage As CAcroAVPageView

Dim PDPage As CAcroPDPage

Dim PDDoc As CAcroPDDoc

Dim Rect As CAcroRect

Dim LinkAnnot As CAcroPDAnnot

Set AcroApp = CreateObject(‘AcroExch.App’)

Set Rect = CreateObject(‘AcroExch.Rect’)

‘ set the values below to whatever coodinate you desire the link to be at

Rect.Top = 500

Rect.Left = 20

Rect.Right = 200

Rect.Bottom = 490

Set AVDoc = AcroApp.GetActiveDoc

Set PDDoc = AVDoc.GetPDDoc

Set AVPage = AVDoc.GetAVPageView

Set PDPage = PDDoc.AcquirePage(AVPage.GetPageNum)

Set LinkAnnot = PDPage.AddNewAnnot(-1, ‘Link’, Rect)

You May Also Like

About the Author: Planet PDF Team

Leave a Reply