早々に解答有り難うございます。
1年くらいずっと解決できなかったことが、ようやく解決できました。
今回初めてインターネットを利用して質問してみました。質問してみるものだなと実感しました。
私は、APIなるもの
Declare Function SetCurrentDirectory Lib "kernel32" Alias "SetCurrentDirectoryA" (ByVal lpPathName As String) As Long
も知らなかったし、
SetCurrentDirectory ("\\server1\aa")
のステートメントもはじめてみました。
勉強になりました。本当に有り難うございました。