Marko soll bei Wert in Zelle Starten!

Kruemelmonstar · 2024-08-28T09:44:47+00:00

Hallo, ich möchte gerne einen Makrobefehl starten lassen, wenn ein Wert in einer Zelle ( V22 ) sich ergibt. Die Zelle hat eine Formel ( Sverweis) und gibt das Wort Ja oder nein wieder. Bei Ja soll ein Marko "TSW" gestartet werden. Suche hat mir dies vorgeschlagen : Sub worksheet_change(Target As Range) If Target.Address = "$V$22" And Target.Value = "Ja" Then Call TSW End If End Sub Jedoch bekomme ich den Fehler " Fehler beim Kompilieren: Deklaration der Prozedur entspricht nucht der Beschreibung eines Ereignisses...."

Hi
der korrekte Prozedurkopf ist:

Sub worksheet_change(ByVal Target As Range)

das "ByVal" muss angebeben werden, da beim Weglassen dieser Angabe "ByRef" der Default-Wert ist und dieser hier nicht zulässig ist

um sicher zu gehen, dass die Eventmakros auch funktionieren sollte man sie nicht vollständig selber schreiben, sondern die automatisch erstellen lassen:
1. im VBA-Editor auf das Modul des Tabellenblatts wechseln
2. in der rinken Combobox über dem Codefenster "Worksheet" auswählen
3. in der rechten Combobox über dem Codefenster das gewünschte Eventmakro auswählen
dann wird das Makro als Grundgerüst mit Start und Endzeile erstellt und du kannst deinen Code dazwischen schreiben.

für das Funktionieren ist die richtige Schreibweise der Kopfzeile wichtig.
ändern darf man höchsten das Private/Public am Anfang und man kann, wenn man möchte, die Bezeichnung der Übergabeparameter ändern ("Target"), was aber keinen positiven Effekt hat.
Alles andere muss so bleiben wie dort geschrieben.

Gruß Daniel

Hi
du solltest mit If Not Intersect(Target, Range(???)) is Noting prüfen, ob die Eingabzelle, welche für die Wertänderung der SVerweis-Funktion in V22 verantwortlich ist, prüfen. ??? sollte also die Zelle sein, auf die dein SVerweis im ersten Parameter referenziert.
beim Change-Event liegen im Target immer nur die Zellen, die der Anwender oder ein Makro direkt geändert haben, aber nicht die Zellen, die eine Formel enthalten und das Formelergebnis sich aufgrund einer neuberechnung der Formel geändert hat.

weiterhin sollte man in Makros, welche Zellinhalte ändern, den Aufruf der Eventmakros ausschalten, wenn dieser nicht erwünscht ist.
dazu gibt es die Anweisung Application.EnableEvents = False
danach werden keine Eventmarkos mehr ausgeführt.
zum aktivieren der Eventmakros muss der Befehl Appication.EnableEvents = True ausgeführt werden.
Dies muss auf jeden Fall noch im Makro passieren, da sonst die Events ausgeschaltet bleiben.
Sollte da mal passieren (beim Testen oder nach einem Fehler), dann kann man diesen Befehl auch im Direktfenster eingeben und ausführen.a

Gruß Daniel

Marko soll bei Wert in Zelle Starten!

Forumthread: Marko soll bei Wert in Zelle Starten!

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Marko soll bei Wert in Zelle Starten!

Forumthread: Marko soll bei Wert in Zelle Starten!

13 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread