Notes Property

Returns or sets the optional notes associated with a shared workspace link. Read/write String.

expression.Notes

expression    Required. An expression that returns a SharedWorkspaceLink object.

The following example creates a list of all the shared workspace links that contain the word "building" in the Notes field.

        Dim strBuildingLinks As String
    Dim swsLink As Office.SharedWorkspaceLink
    For Each swsLink In ActiveWorkbook.SharedWorkspace.Links
        If InStr(swsLink.Notes, "building", vbTextCompare) > 0 Then
            strBuildingLinks = strBuildingLinks & swsLink.Description & vbCrLf
        End If
    Next
    MsgBox "Building Links: " & vbCrLf & strBuildingLinks, _
        vbInformation + vbOKOnly, "Building Links in Shared Workspace"