relativer Pfad

In einem Ordner habe ich eine Übersichtsdatei, von der ich über eine Userform eine weitere Datei "Adressdatei.xls" mit nachfolgendem Code öffne:

Private Sub cmdWeiter_Click()
Workbooks.Open FileName:= _
"\\projekte\001\adressdatei.xls"
End
End Sub
Wenn ich aber den Ordner auf Disektte speichere und von dort aus auf einem anderen Rechner die Datei öffnen möchte, kommt eine Meldung, dass er die Datei nicht findet.

Wer kann mir bei der relativen Adressierung helfen?

Vielen Dank!

Gruß

Stefan F.