expression.SourcePath
expression Required. An expression that returns a LinkFormat object.
Remarks
The path doesn't include a trailing character (for example, "C:\MSOffice"). Use the PathSeparator property to add the character that separates folders and drive letters. Use the SourceName property to return the file name without the path and use the SourceFullName property to return the path and file name together.
Example
This example returns the path and name of the source file for any shapes on the active document that are linked OLE objects.
For Each s In ActiveDocument.Shapes
If s.Type = msoLinkedOLEObject Then
Msgbox s.LinkFormat.SourcePath & "\" _
& s.LinkFormat.SourceName
End If
Next s