Smalltalk

Munich schrieb:

ich würd einfach mal probieren die beiden Zeilen: Set wordapp = CreateObject("word.Application") wordapp.Visible = True auszukommentieren. Ich vermute mal dass es daran liegt. Wenn Du ausserdem danach noch einmal winword.exe aufrufst, dann öffnet sich ja immer nochmal word. Kommt jetzt drauf an von wo aus Du das aufrufst... Wenns aus Word kommt, dann nicht mit shell arbeiten... aus word reicht ein Documents.Open. Aus Excel z.b. macht es aber sinn mit shell zu arbeiten. Sub Makro2() ' Beispiel Datei öffnen filetoopen = "Filepfad&Filename.doc" Documents.Open FileName:=filetoopen, ConfirmConversions _ :=False, ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _ PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _ WritePasswordTemplate:="", Format:=wdOpenFormatAuto End Sub

Ich arbeite nicht aus Word und auch nicht aus Excel heraus. Ich habe vor eine Benutzeroberfläche zu gestalten, von der aus mehrere Dokumente mittels eines Commandbutton (für jedes dot ein Button) geöffnet und dann bearbeitet werden können. Ich weiss das man dies auch einfacher realisieren kann, indem man in Word ein neues Dokument mittels der in das Vorlagenverzeichnis kopierten dot's öffnet, aber das möchte ich nicht.