Thema Datum  Von Nutzer Rating
Antwort
Rot Code verkürzen
19.10.2021 12:37:05 MasterOfDesaster
NotSolved
19.10.2021 18:31:29 xlKing
NotSolved
20.10.2021 13:49:33 MasterOfDesaster
NotSolved

Ansicht des Beitrags:
Von:
MasterOfDesaster
Datum:
19.10.2021 12:37:05
Views:
239
Rating: Antwort:
  Ja
Thema:
Code verkürzen
Guten Tag,
ich nutze folgenden Code, zum Wechseln des Datensatzes zum nächsten Datensatz:

Private Sub cmdGoToNext_Click()
On Error GoTo Err_cmdGoToNext_Click:
DoCmd.GoToRecord , , acNext
Exit_cmdGoToNext_Click:
Exit Sub
Err_cmdGoToNext_Click:
MsgBox Err.Description
Resume Exit_cmdGoToNext_Click
End Sub

 

Ich frage mich, ob man diesen Code nicht etwas abkürzen könnte?

Frage: ist die letzte Anweisung

Resume Exit_cmdGoToNext_Click

nicht überflüssig? Die Prozedur wird doch am Ende so oder so beendet.

 

Dann könnte man doch den ganzen Exit_cmdGoToNext und Exit Sub Quatsch weglassen (habe ich im Folgenden auskommentiert), und den Code kürzen auf folgende Zeilen:

Private Sub cmdGoToNext_Click()
On Error GoTo Err_cmdGoToNext_Click:
DoCmd.GoToRecord , , acNext
'Exit_cmdGoToNext_Click:
'Exit Sub
Err_cmdGoToNext_Click:
MsgBox Err.Description
'Resume Exit_cmdGoToNext_Click
End Sub

Ist das so korrek, oder übersehe ich da was?

Vielen Dank im Voraus für Eure Mithilfe!


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Code verkürzen
19.10.2021 12:37:05 MasterOfDesaster
NotSolved
19.10.2021 18:31:29 xlKing
NotSolved
20.10.2021 13:49:33 MasterOfDesaster
NotSolved