Path exists on network?

Determines if a path exists anywhere on network.
Requires full path
Author: michael@excelexperts.co.uk

Function PathExists(pname) As Boolean

    Dim x As String

    On Error Resume Next
    x = GetAttr(pname) And 0
    If Err = 0 Then
        PathExists = True
    Else
        PathExists = False
    End If
    On Error GoTo 0

End Function