GefObject.LinkFormat (read-only property)

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.


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"
        MsgBox "The object is a link container"
    End If
End Sub