URL.Address

Property Address As String

Member of URL

The Address property returns or sets the address of a URL.

The following code example displays all of the URLs contained in the active page:

Sub Test() 
 Dim sh As Shape, s As String 
 For Each sh In ActivePage.Shapes 
  s = s & sh.URL.Address & vbCr 
 Next sh 
 MsgBox "The current page contains the following URL addresses: " & 
vbCr & s 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.