A partir deste artigo técnico sobre a rede , há um código que lançará um arquivo do disco local:
Private Sub Command1_Click()
Dim LWordDoc As String
Dim oApp As Object
'Path to the word document
LWordDoc = "c:\Doc1.doc"
If Dir(LWordDoc) = "" Then
MsgBox "Document not found."
Else
'Create an instance of MS Word
Set oApp = CreateObject(Class:="Word.Application")
oApp.Visible = True
'Open the Document
oApp.Documents.Open filename:=LWordDoc
End If
End Sub
Isso deve funcionar se você substituir "c: \ Doc1.doc" por "\ server \ folder \ doc1.doc"
Enquanto o artigo não menciona versões mais recentes do Access / Word, isso ainda deve funcionar.