Hallo Martin,
cool dass diese Form der Programmierung bei dir funktioniert. Bei mir (VB Express 2008) klappt das noch nicht. Aufgrund der
Deklarierung von Buff auf String wird das Ergebnis vom Typ Boolean nicht angenommen. Und den Befehl ShellExcute kennt mein
Programm leider auch noch nicht. Daher kann ich dir hier nur bedingt weiterhelfen.
Soweit ich das sehen kann willst du Word öffnen, egal in welchem Pfad es liegt.
Hast du das mal so versucht?
Private Sub cmd_Sales_PT_Click()
Dim wd As Object, dc As Object
wd = CreateObject("Word.Application")
wd.visible = True
'ab hier dein Wordcode. z.B.
dc = wd.documents.add 'erstellt ein neues Dokument
dc.Range.Text = "Hallo du da" 'hinterlegt dort Text
End Sub
Ansonsten beschreib doch mal etwas näher, was genau du machen willst.
Gruß Mr. K.