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

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
REPI walliilse „Access 2002“
Optionen

1. on error goto Routine benutzen, damit werden alle Fehler abgefangen!
2. Ausgabe der msgbox abfangen und dann bei Abbrechenbutton nach exit sub verzweigen.

Es empfiehlt sich immer, etwas Linux im Hause zu haben.
bei Antwort benachrichtigen