system(programm)meldungen in vba abfangen

[tintifax]

hi!

gibts in vba (excel) irgendeine möglichkeit system- (bzw programm-)meldungen abzufangen und mit von mir vorgegebenen antworten zu belegen??? ich mein damit solche sachen wie: wenn man ein makro schreibt, das bei klick auf nen button ein angegebens excelsheet oder diagramm löscht wird man ja per popupwindow darauf hingewiesen, dass die daten/das diagramm wirklich gelöscht werden und man muss "ok" oder "abbrechen" anklicken. genau das möchte ich umgehen und das "ok"-feld gleich automatisch bestätigt haben! oder wenn man das programm beendet und gefragt wird ob man änderungen speicher möchte, möchte ich "einen automatischen klick auf nein"!
geht das in vba bzw kann mir da wer helfen?!

danke im voraus für ALLE antworten!
mfg

[flinx]

Maybe this helps:

Object: Application

DisplayAlerts-Eigenschaft

True, wenn Microsoft Excel bestimmte Warnungen und Meldungen anzeigt, während ein Makro ausgeführt wird. Boolean Schreib-Lese-Zugriff.

Anmerkungen

Der Standardwert ist True. Legen Sie diese Eigenschaft auf False fest, wenn Sie während der Ausführung eines Makros nicht durch Eingabeaufforderungen und Warnmeldungen unterbrochen werden wollen und stattdessen Microsoft Excel die Standardantwort auswählen soll.

Wenn Sie diese Eigenschaft auf False eingestellt haben, setzt Microsoft Excel sie nach Beendigung des Makros nicht automatisch auf True zurück. Ihr Makro sollte die Eigenschaft stets auf True zurücksetzen, wenn es beendet wird.

Beachte bitte den letzten Absatz, sparst dir einen Haufen Ärger.

[tintifax]

vielen dank, werds morgen dann mal gleich ausprobieren! hoffe nur, dass ich auch überall die standardantworten brauche ... aber das klingt echt schon mal brauchbar
THX

[pc.net]

schau dir mal die parameter der einzelnen befehle an. meist gibts da die option, dass diese fragen schon beantwortet werden.

die vba-hilfe gibt auskunft :

Das folgende Beispiel schließt sämtliche Arbeitsmappen und speichert die darin vorgenommenen Änderungen, mit Ausnahme der Arbeitsmappe, aus der das Makro ausgeführt wird.

For Each w In Workbooks
    If w.Name <> ThisWorkbook.Name Then
        w.Close savechanges:=True
    End If
Next w

dann gibts beim schließen keine rückfrage mehr ...