Automatisches schliessen von Excel

[Kalle Admin]

Moin Moin

Jetzt habe ich es soweit das ich die excel datei per batch aufrufe und nach
der Aktuallisierung auch schliesst :-)
aber wie bekomme ich das hin das auch excel sich schliesst sonst arbeitet
sich die Batch nicht weiter ab

Ich sage jetzt schon mal Danke
Euer Kalle

[Melanie Breden]

Hallo Kalle,

Post by Kalle Admin
Moin Moin
Jetzt habe ich es soweit das ich die excel datei per batch aufrufe und nach
der Aktuallisierung auch schliesst :-)
aber wie bekomme ich das hin das auch excel sich schliesst sonst arbeitet
sich die Batch nicht weiter ab

das geht mit Application.Quit

Setze für Application dein verwendetes Application-Objekt ein.

Evtl. noch das App-Objekt zurücksetzen:
Set xlApp = Nothing

Wenn das nicht hilft, poste mal den Code der Batch Datei.

[Kalle Admin]

Der Batch aufruf ist:
M:\Stati\Tag\tag.xls
Das Makro inder XLS ist:

Modul1:

Sub Auto_open()
ActiveWorkbook.Close SaveChanges:=True
End Sub

Ich habe schon experimentiert mit deiner Antwort, aber ich krieg es nicht
gebacken (HILFE)

Danke Kalle

Post by Melanie Breden
Hallo Kalle,

Post by Kalle Admin
Moin Moin
Jetzt habe ich es soweit das ich die excel datei per batch aufrufe und nach
der Aktuallisierung auch schliesst :-)
aber wie bekomme ich das hin das auch excel sich schliesst sonst arbeitet
sich die Batch nicht weiter ab

das geht mit Application.Quit
Setze für Application dein verwendetes Application-Objekt ein.
Set xlApp = Nothing
Wenn das nicht hilft, poste mal den Code der Batch Datei.
--
Mit freundlichen Grüssen
Melanie Breden
- Microsoft MVP für Excel -
http://excel.codebooks.de (Das Excel-VBA Codebook)
#Excel-Auftragsprogrammierung#

[Melanie Breden]

Hallo Kalle,

Post by Kalle Admin
M:\Stati\Tag\tag.xls
Sub Auto_open()
ActiveWorkbook.Close SaveChanges:=True
End Sub
Ich habe schon experimentiert mit deiner Antwort, aber ich krieg es nicht
gebacken (HILFE)

ich würde das Workbook_Open-Ereignis statt des Auto_Open-Makros nehmen,
da Auto-Macros oftmals beim Öffnen durch andere Programmierung nicht ausgelöst werden.

Speicher folgende Prozeduren im Codemodul DieseArbeitsmappe:

Private Sub Workbook_Open()
ThisWorkbook.Close SaveChanges:=True
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Quit
End Sub

[Kalle Admin]

Schön wenn mann eine Nacht drüber schlafen kann

Mein Makro sieht so aus:
Sub Auto_Open()
Application.Quit
End Sub
Sub Auto_Close()
ActiveWorkbook.Close SaveChanges:=True
End Sub

Es lief auch erst nach dem ich (O2K SP3) das Reparaturtool drüber laufen
lies

Ich danke dir für die Hilfe
bis zum nächsten Prob.

Euer Kalle

Post by Melanie Breden
Hallo Kalle,

Post by Kalle Admin
M:\Stati\Tag\tag.xls
Sub Auto_open()
ActiveWorkbook.Close SaveChanges:=True
End Sub
Ich habe schon experimentiert mit deiner Antwort, aber ich krieg es nicht
gebacken (HILFE)

ich würde das Workbook_Open-Ereignis statt des Auto_Open-Makros nehmen,
da Auto-Macros oftmals beim Öffnen durch andere Programmierung nicht ausgelöst werden.
Private Sub Workbook_Open()
ThisWorkbook.Close SaveChanges:=True
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Quit
End Sub
--
Mit freundlichen Grüssen
Melanie Breden
- Microsoft MVP für Excel -
http://excel.codebooks.de (Das Excel-VBA Codebook)
#Excel-Auftragsprogrammierung#