Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Fehlermeldung in einem Makro abfangen

751 views
Skip to first unread message

Arno Cloos

unread,
Feb 10, 2003, 12:47:08 PM2/10/03
to
Hallo,

wer kann mir helfen:

ich habe ein Makro (siehe unten) geschrieben das die Datei "Test.xls"
aufruft und die Daten über eine ODBC-Schnittstelle aktualisiert.
Nach der Aktualisierung wird die Datei gespeichert und geschlossen.
Leider wird vor dem speichern bzw.schließen die Fehlermeldung: "Diese Aktion
wird eine anstehende Datenaktualisierung abbrechen. Fortfahren?" ausgegeben
und Makro wartet auf eine Eingabe.
Über dei Wait-Methode läßt sich der Fehler nicht ausschalten.
Welche Möglichkeiten gibt es sonst noch?

Workbooks.Open Filename:="Test.xls"
ActiveWorkbook.RefreshAll
ActiveWorkbook.Save
ActiveWindow.Close

Vielen Dank im voraus für die Hilfe

Gruß

Arno Cloos


Uwe Koehler

unread,
Feb 10, 2003, 2:08:33 PM2/10/03
to
On Mon, 10 Feb 2003 18:47:08 +0100, "Arno Cloos"
<Arno...@t-online.de> wrote:

>Hallo,
>
>wer kann mir helfen:
>
>ich habe ein Makro (siehe unten) geschrieben das die Datei "Test.xls"
>aufruft und die Daten über eine ODBC-Schnittstelle aktualisiert.
>Nach der Aktualisierung wird die Datei gespeichert und geschlossen.
>Leider wird vor dem speichern bzw.schließen die Fehlermeldung: "Diese Aktion
>wird eine anstehende Datenaktualisierung abbrechen. Fortfahren?" ausgegeben
>und Makro wartet auf eine Eingabe.

Hallo Arno,

2 Methoden sind für Dich interessant:

Application.DisplayAlerts = False am Anfang des Codes

DeinCode

Application.DisplayAlerts = True am Ende des Codes
(nicht vergessen!)

damit schaltest Du Windows-(Excel-)typische Warnmeldungen in der Form:
"Wollen Sie wirklich..." während der Codeausführung abund zum Ende
wieder ein - das bitte nicht vergessen.

Fehler werden übrigens mit OnError behandelt, das von Dir geschilderte
ist allerdings kein Fehler im VBA-Sinn.

HTH

Uwe

ulrich weigel

unread,
Feb 11, 2003, 7:53:55 AM2/11/03
to

>-----Originalnachricht-----
>Hallo Arno,
du solltest in diesem Fall aber nicht DisplayAlerts
arbeiten, da es in Deinem Fall sich nicht um eine
Fehlermeldung handelt, sondern um eine Warnung, das beim
Speichern oder Schließen die laufende Abfrage unterbrochen
wird.
Grus Ulrich

Peter Eichler

unread,
Feb 11, 2003, 9:03:41 AM2/11/03
to
du mußt die eigenschaft "abfrage im hintergrund ausführen" auf nein setzten,
dann kommt excel erst dann zum speichern/schließen, wenn die abfrage durch
ist. ein speichern vor ende der abfrage macht ja eh keinen sinn, da das
ergebnis ja noch nicht vorliegt.

alos z.b. vor dem

----Selection.QueryTable.Refresh

die option

----Selection.BackgroundQuery = False

setzen.

das hilft, oder?

gruß
peter

"ulrich weigel" <mdlle...@aol.com> schrieb im Newsbeitrag
news:03b501c2d1cc$a2ff5050$a401...@phx.gbl...

sascha...@gmail.com

unread,
Oct 30, 2014, 9:31:53 AM10/30/14
to
Ja es hilft! Danke!

Gruß
Sascha
0 new messages