Off-page references in Visio Automation with VB6

Hi :wave:
I am involved in a project which partly requires Visio automation.. Anybody knows how to create an off-page reference and point it to a page of certain name?

Following lines of code dont seem to work :cry:

VB Code:

Set vsoMaster1 = vsoStencil.Masters.ItemU("Off-page reference")
 
vsoMaster.Shapes.Item(1).AddHyperlink.Name = "OffPageConnector"
vsoMaster.Shapes.Item(1).AddHyperlink.Description = "Off-page Re&ference"
vsoMaster.Shapes.Item(1).AddHyperlink.Address = "Page-2"

Any help wud be greatly appreciated while I tinker around on my own :)

Welcome to the Forums.

Moved from the API forum.

I have done some Visio Automation before on this site. Try a search by my username and Visio for some code examples that may help. :)

Heyyy :D

Figured it out myself ;) After creating the off-page reference, use SubAddress property to point it to a page within the same Visio Doc

VB Code:

vsoOffPageReference.AddHyperlink.SubAddress = "Pagename"

It works :thumb: