Gets the GefLinkFormat for the object. | |
Syntax: | Set GefLinkFormat = object.LinkFormat |
Description: | This property is valid for link container object
only. Returns Nothing if this property is not valid for the
object. Example: Sub GefObject_LinkFormat() Dim oCimObj As GefObject Dim oCimLnkFmt As
GefLinkFormat Set oCimObj = CimGetObject Set oCimLnkFmt =
oCimObj.LinkFormat If oCimLnkFmt Is Nothing
Then MsgBox "The
object is not a link container" Else MsgBox "The
object is a link container" End If End Sub |