Datei in VErzeichnis aus Anwendung heraus suchen
14.12.2003 15:08:19
Fritz Sanne
Mit u.a. Teilcode rufe ich die Dokumentvorlage Einladung1 auf.
Die Dokumentvorlage befindet sich im gleichen Ordner, wie die Excel-Anwendung.
Um die Sache auch auf meinem dienstl. PC zum Laufen zu bringen, musste ich eine zweite Zeile für diesen PC einbauen. Da ich meine Programmierversuche auch meinen Kolleginnen und Kollegen zur Verfügung stellen möchte, bitte ich Euch, mir zu verraten, ob man Excel nicht aneisen kann sich selbst herauszusuchen, wo die Dokumentvorlage Einladung1 zu finden ist. Ich meine, ich hätte so etwas irgendwo schon einmal gesehen.
Hier mein Teilcode
Sub Einladung1()
Dim WD As Object
Application.ScreenUpdating = False
Set WD = CreateObject("word.application")
On Error Resume Next
WD.Documents.Add "D:\Eigene Dateien\Bewährungshilfe\Einladung1.dot"
WD.Documents.Add "D:\WINNT40\Profiles\bewhg06\Desktop\Bewährungshilfe\Einladung1.dot"
WD.Visible = True
Usw.
Danke für Eure Mühe.
Fritz