Startseite > Tipps & Tricks > Rund um die VB-IDE > Option Unterbrechen bei Fehlern lesen und schreiben
Team-Moeller.de - Datenbankentwicklung und mehr ...

Option Unterbrechen bei Fehlern lesen und schreiben

Option "Unterbrechen bei Fehlern" lesen und schreiben

Funktion

Mit den beiden folgenden Funktionen kann der Wert der Option "Unterbrechen bei Fehlern" ausgelesen und geschreiben werden.

Code

Public Enum ErrorTrapping
  etBeiJedemFehler = 0
  etInKlassenmodul = 1
  etNichtVerarbeitet = 2
End Enum

Public Function OptionErrorTrappingLesen() As ErrorTrapping
OptionErrorTrappingLesen = Application.GetOption("Error Trapping")
End Function
Public Function OptionErrorTrappingSetzen(NeuerWert As ErrorTrapping)
Application.SetOption "Error Trapping", NeuerWert
End Function

Beschreibung

Es wird eine eigene Enumeration erstellt, die die möglichen Werte enthält.
Das Lesen und Schreiben des Optionswertes erfolgt mit den Funktionen GetOption bzw. SetOption.
Als Argument ist "Error Trapping" zu übergeben.

Verweise

Damit dieser Code funktioniert, sind keine zusätzlichen Verweise erforderlich.

Microsoft MVP - Thomas Möller


06.05.2017:
TM-VBALineNumbers
Version 1.29.01 bereitgestellt.


27.03.2016:
TM VBA-Inspector:
Installationsroutine überarbeitet.


23.05.2014:
TM-RebuildDatabase
Version 1.75 bereitgestellt.


07.12.2014:
TM-DatenKlassenGenerator
Version 3.55 bereitgestellt.


Powered by CMSimple - Template by CMSimple-Styles.com - Autor:Thomas Möller