HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Nächster Thread

Vorwärts blättern

Inhaltsverzeichnis

Change Ereignis

Forumthread: Change Ereignis
11 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Change Ereignis

Change Ereignis

16.02.2025 16:16:47

walter k

Guten Tag,

Public Sub Worksheet_Change(ByVal Target As Range)

 Application.EnableEvents = True

 MsgBox "Änderung erkannt in der Zelle: " & Target.address

End Sub

Worksheet-Change funktioniert nicht, wieso ?

mfg kurt k

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Change Ereignis

16.02.2025 16:22:41

ralf_b
AW: Change Ereignis

16.02.2025 16:27:30

GerdL
AW: Change Ereignis

16.02.2025 23:42:30

Daniel
Danke Daniel für die Zusatzinformation. -)

17.02.2025 11:41:10

kurt k
AW: Change Ereignis -)

16.02.2025 16:44:38

kurt k
AW: Change Ereignis

16.02.2025 17:03:32

kurt k
AW: Change Ereignis

16.02.2025 17:07:03

ralf_b
Alles in Ordnung -)

16.02.2025 19:11:58

kurt k
Leider wieder nicht, warum auch immer

16.02.2025 16:58:57

kurt k
AW: Leider wieder nicht, warum auch immer

16.02.2025 17:04:40

RPP63
AW: Leider wieder nicht, warum auch immer

17.02.2025 12:25:17

Yal

AW: Change Ereignis

16.02.2025 16:22:41

ralf_b

am Code liegts nicht.

Application.EnableEvents = True solltest du mal im Direktfenster eingeben und "Enter" drücken

wenn die Events aus sind wird das Change gar nicht ausgelöst.

AW: Change Ereignis

16.02.2025 16:27:30

GerdL

Hallo Walter!

Mögliche Ursachen:
a) Die Events sind ausgeschaltet.
b) Diese Prozedur steht nicht im Modul der Tabelle.

Gruß Gerd

AW: Change Ereignis

16.02.2025 23:42:30

Daniel

Hi
zwei möglichkeiten:
a) du hast ein weiteres Makro oder Eventmakro, in dem irgendwo der Befehl Application.EnableEvents = False ausgeführt wird, ohne dass dies innerhalb dieses Eventmarkos mit Application.EnableEvents = True wieder rückgängig gemacht wird. ( das kann auch auf Grund eines Fehlerabbruchs sein)
wenn das passiert, bleiben die Events deaktiviert.
Nach einem Neustart von Excel sind sie dann wieder aktiv

b) du klickst irgendwann mal im Menü Entwickertools auf den den Butten "Entwurfsmodus". Ist dieser aktiv, werden ebenfalls keine Eventmarkos ausgeführt.
zum deaktivieren des Enwurfsmodus einfach nochmal auf den Button klicken.

Gruß Daniel

Danke Daniel für die Zusatzinformation. -)

17.02.2025 11:41:10

kurt k

AW: Change Ereignis -)

16.02.2025 16:44:38

kurt k

Hallo allerseits,
komisch, habe Excel komplett geschlossen, auf einmal klappt es.
Makro ist genau wie vorher !

mfg kurt k

AW: Change Ereignis

16.02.2025 17:03:32

kurt k

Sorry zusammen,
hatte ausversehen beim aktivieren Namen vom Sohn benutzt (walter k)

mfg kurt k

AW: Change Ereignis

16.02.2025 17:07:03

ralf_b

Application.EnableEvents = True wenn du das benutzt, dann benutzt du sicher irgendwo auch Application.EnableEvents = false

Alles in Ordnung -)

16.02.2025 19:11:58

kurt k

Leider wieder nicht, warum auch immer

16.02.2025 16:58:57

kurt k

Hallo zusammen,
warum auch immer, auf einmal funktioniert es nicht.

Private Sub Worksheet_Change(ByVal Target As Range)

 Application.EnableEvents = True 

 MsgBox "Änderung erkannt in der Zelle: " & Target.address

End Sub

Warum setzt das Change Ereignis immer aus ?
mfg kurt k

AW: Leider wieder nicht, warum auch immer

16.02.2025 17:04:40

RPP63

Das liegt am Code, den Du uns nicht zeigst.

AW: Leider wieder nicht, warum auch immer

17.02.2025 12:25:17

Yal

Hallo Kurt,

weil irgendwo in einem Code-Teil, die wir nicht sehen, einen
Application.EnableEvents = False
vorhanden ist, ohne dass es dazu den passsenden
Application.EnableEvents = True
vor dem Ende der Procedure gibt.

Kurz gesagt: wenn Du das Licht beim Reinkommen anmachen muss, gehört es dazu, diese wieder auszumachen, wenn Du rausgehst.

Public Sub Worksheet_Change(ByVal Target As Range)

    Application.EnableEvents = False 'weil sonst diese Ereignis ausgelöst werden könnte, bevor es durch gelaufen ist-> Excel stürzt ab.

    MsgBox "Änderung erkannt in der Zelle: " & Target.Address

    Application.EnableEvents = True

End Sub

VG
Ya

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!