On Error wird nicht ausgeführt

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: On Error wird nicht ausgeführt
von: Peter
Geschrieben am: 04.12.2003 07:30:53

Hallo
seit der Neuinstallation meines PC's, wird die On Error Funktion nicht mehr ausgeführt. Wer hat eine Idee?


Sub Error_Test()
    Sheets("Tabelle1").Select
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("A2").Select
On Error Resume Next    'Wird nicht wirksam !!!!!!!
'On Error GoTo Ende      'Wird nicht wirksam !!!!!!
    Sheets("Tabelle3").Select       'Falsche Auswahl um Error zu testen
Ende:
    Sheets("Tabelle2").Select
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("A2").Select
    
    Mldg = "Tabelle 2 ausgefüllt, On Error Test ok!!!!"
    MsgBox Mldg, vbInformation, "Error Test"
    Sheets("Tabelle1").Select
End Sub

Bild


Betrifft: AW: On Error wird nicht ausgeführt
von: Werner
Geschrieben am: 04.12.2003 07:37:47

Hallo Peter,
Teste mal so!

Gruss Werner

Option Explicit


Sub Error_Test()
Dim Mldg
'On Error Resume Next    'Wird nicht wirksam !!!!!!!
On Error GoTo Ende      'Wird nicht wirksam !!!!!!
    Sheets("Tabelle1").Select
    Range("A1").Select
    ActiveCell = "1"
    Range("A2").Select
    Sheets("Tabelle3").Select       'Falsche Auswahl um Error zu testen
Exit Sub
Ende:
    Sheets("Tabelle2").Select
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("A2").Select
    
    Mldg = "Tabelle 2 ausgefüllt, On Error Test ok!!!!"
    MsgBox Mldg, vbInformation, "Error Test"
    Sheets("Tabelle1").Select
End Sub



Bild


Betrifft: AW: On Error wird nicht ausgeführt
von: Peter
Geschrieben am: 04.12.2003 07:46:22

Hallo Werner,

hatte ich schon getestet, Fehler bleibt.
Gruß Peter


Bild


Betrifft: AW: On Error wird nicht ausgeführt
von: Peter
Geschrieben am: 04.12.2003 22:24:20

Hallo Nepumuk,

danke für den Tip. Genau dies war das Problem. Ich frage mich, welches Makro diese Einstellung vorgenommen hat. Gibt es eine Möglichkeit diese Voreinstellung per VBA zur Programmieren?
Danke Peter


Bild


Betrifft: AW: On Error wird nicht ausgeführt
von: Nepumuk
Geschrieben am: 04.12.2003 23:33:43

Hallo Peter,
mit eine Reihe von SendKeys - Anweisungen ist das durchaus möglich.
Gruß
Nepumuk


Bild


Betrifft: AW: On Error wird nicht ausgeführt
von: Nepumuk
Geschrieben am: 04.12.2003 09:21:57

Hallo Peter,
Kurzfassung: VBA-Editor - Extras - Optionen - Allgemein - Unterbrechen bei Fehlern - (OptionButton) "Bei nicht verarbeiteten Fehlern" musst du anklicken.
Gruß
Nepumuk


Bild

Beiträge aus den Excel-Beispielen zum Thema " Bereich per makro in nächstes tabellenblatt kopier"