SharedWorkspaceLink.Notes Property - Microsoft Office Excel

Syntax

expression.Notes

expression A variable that represents a SharedWorkspaceLink object.

Example

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

Visual Basic for Applications

Visual Basic for Applications
`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"`

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"

notes notes property ofv

See also: