Öffnen von Word-Dateien aus Excel
14.04.2005 12:48:10
Word-Dateien
per Makro kann ich Word mit einer gewünschten .DOT-Vorlage zwecks Erstellung eines neuen Dokumentes auf folgende Art öffnen:
Set myWord = GetObject(, "Word.Application")
myWord.Application.documents.Add Template:="C:\vorlagen\Brief.dot", NewTemplate:=False
Funktioniert bestens.
Aus verschiedenen Gründen würde ich gerne folgende Form verwenden:
Set MyShell = CreateObject("WScript.Shell")
strDateiName = "C:\vorlagen\Brief.dot"
strDateiName1 = Chr(34) & strDateiName & Chr(34)
MyShell.Run strDateiName1
Set MyShell = Nothing
Die .DOT-Datei wird als .DOT und nicht als neue Datei geöffnet. Irgendwie müsste ich die Template-Info mitgeben können.
Grund für die andere Form: es müssen je nach dem Word, Powerpoint, MsProject u.a. Dateien (Vorlagen oder Dokumente) geöffnet werden, und ich möchte nicht für jede Art einen eigenen Aufruf schreiben müssen.
Irgendjemand eine Glanzidee?
Dank und Gruss
yogi