laufwerk/pfadanpassung
15.12.2005 14:30:28
ge-ka
die geschieht -am eigenen rechner erfolgreich- so:
Sub Auswahl_Schaltfläche11_BeiKlick()
CreateObject("word.application").documents.Open("C:\Dokumente und Einstellungen\ego\Eigene Dateien\Projekt Bericht\TD2.doc")
End Sub
da aber der memorystick bei rechnerwechsel immer mal einen anderen lw-namen bekommt, möchte ich den pfad automatisch abgreifen. eine kopie des dokumentes befindet sich auf dem stick.
wenn ich so vorgehe
CreateObject("word.application").documents.Open("ThisWorkbook.Path\ TD2.doc")
klappts jedoch nicht. was mache ich falsch?
die datei ist ordentlich auf dem stick und läßt sich durch anklicken einwandfrei öffnen...
danke!
Anzeige