Office - Word, Excel und Co. 9.703 Themen, 40.813 Beiträge

Verfolgung starten Optionen

Access 2002

walliilse / 6 Antworten / Flachansicht Nickles

Hallo Ihr fleißigen Helfer,

ein Anfänger hat viele Frage, aber eine nach der anderen.

Hier die erste.

In eine Ergebnis Routine habe ich eine If Abfrage. Es erscheint ein Fenster welches mit OK oder Abbrechen beantwortet werden mus.

Dim i As Integer
DoCmd.RunCommand acCmdSaveRecord ' Satz nochmals speichern

i = DCount("KZ", "T00-Adress Ebay", "KZ='X'")

If i = 0 Then
MsgBox " Es ist kein KZ mit X gesezt"
Exit Sub
End If

stDocName = "B007 Abfrage Umschlag mit"

DoCmd.OpenReport stDocName, acPreview

End Sub


Wenn ich einen falschen Wert eingebe oder Abbrechen drücke, läuft das programm weiter und führt zu einen Fehler.

Wie kann ich das verhindern. Z.B. das er in Pprogramm stehen bleibt. Vielleicht gibt es bei den DoCmd Parameter die dies verhindern?

Erstmal vilen Dank im voraus.
Dieter

bei Antwort benachrichtigen
Wie kann ich das verhindern. Z.B. das er in Pprogramm stehen bleibt. ... neanderix
Hallo Volker, danke für Deinen Tip. ich glaube aber es kommt nicht von ... walliilse
neanderix walliilse „Access 2002“
Optionen
ich glaube aber es kommt nicht von einer Msgbox Abfrage sondern aus den Abfrage Projekt,

keine ahnung was du meinst. laut deinem Eingangspost willst du eine MessageBox mit OK bestätigen oder mit Cancel Abbrechen - und jeweils entsprechend reagieren.
Und das geht nunmal nicht so, wie du im eingangspost schriebst, sondern so, wie ich beschrieb.

Volker
Computers are like airconditioners - they stop working properly when you open Windows Ich bin unschuldig, ich habe sie nicht gewählt!
bei Antwort benachrichtigen
Hallo Volker, ich Danke Dir, das Du Dir so viel Zeit nimmst um mir zu ... walliilse
1. on error goto Routine benutzen, damit werden alle Fehler abgefangen! 2. ... REPI
Hallo User, kann mir das jemand an Hand von Code, als Beispiel geben? Denn ... walliilse