Macro til åbning af mappe

Hej
kan fint få denne til at virke på et drev på selve pc men ikke netværksdrev
Feks:
Sub OpenFolder()
spath = "c:\"
With Dialogs(wdDialogFileOpen)
.Name = spath
.Show
End With

Virker fint
Sub OpenFolder()
spath = "e:\"
With Dialogs(wdDialogFileOpen)
.Name = spath
.Show
End With

Virker også fint, da E er en harddisk på pc
men
Sub OpenFolder()
spath = "h:\" ' Virker ikke da' h er et neværksdrev
With Dialogs(wdDialogFileOpen)
.Name = spath
.Show
End With

Har prøvet med fulde sti også,