Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Application.Quit

Forumthread: Application.Quit

Application.Quit
13.06.2004 14:28:51
FloGo
Hallo ihr
Ich hab da ein Problem mit einem Worddokument bzw. mit dem schließen des Dokumentes:
Dim myWord As Object

Set myWord = GetObject("C:\Test\ User.doc")

myWord.Application.Documents.Open "C:\Test\ User.doc"

'Die Daten werden von der Tabelle in das Worddokument eingelesen

myWord.PrintOut
Application.Wait Now + TimeSerial(0, 0, 2)
myWord.Application.Quit (True) 'Änderungen werden gespeichert
Die Daten werden richtig eingelesen. Anschließend wird das Dokument gedrukt (zeitverzögerung zum druken). Nun wird die Worddatei und Word geschloßen. Nun mein Prob. er speichert aber die Änderungen die ich vorgenommen habe.
Ich habs auch so pob.:
Dim myWord As Object

Set myWord = GetObject("C:\Test\ User.doc")

myWord.Application.Documents.Open "C:\Test\ User.doc"

'Die Daten werden von der Tabelle in das Worddokument eingelesen

myWord.PrintOut
Application.Wait Now + TimeSerial(0, 0, 2)
MyWord.close savechanges:=False
myWord.Application.Quit (True) 'hier kommt der Fehler
aber dann kommt der Laufzeitfehler:
Automatisierungsfehler
Das aufgerufene Objekt wurde von den Clients getrennt
Hoffe jemand kann mir helfen :-(
FloGo
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Application.Quit
13.06.2004 15:13:30
Kurt
Wahrscheinlich wird Word beendet, ehe der Druck fertig ist.
myWord.Application.Quit (True) 'hier kommt der Fehler
Was soll das True da?
Kurt
AW: Application.Quit
13.06.2004 15:28:04
FloGo
Hallo Kurt
Danke für deine AW!
Was das TRUE da soll weiß ich auch nicht. Ich habe diesen Code mit ein bisschen Hilfe aus der Recherche zusammengebaut und da stand das TRUE dabei. Jetzt hab ich´s gelöscht und es funkt. super.
Ach ja und das mit dem Drucken klappt schon, weil ich habe ja mit
Application.Wait Now + TimeSerial(0, 0, 2)
2 Sekunden Verzögerung eingebaut, vor sich die Datei schließt!
Noch mals VIELEN DANK!
FloGo
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige