Office: Änderung des Zellinhaltes löst Makro aus

Hallo zusammen,

ich habe aus einem ehemaligen Forumsbeitrag diesen VBA Code entnommen und in das Codemodul des Tabellenblattes kopiert:

Private Sub Worksheet_Change(ByVal Target As Range)
Set Target = Intersect(Target, Range("L3:L12"))
If Target Is Nothing Then
Exit Sub
Else
call MyMakro
End If
End Sub

Wenn ich also einer der Zellen L3:L12 ändere, startet MyMakro. Soweit alles prima.

Zwei Fragen:
1.) Es funktioniert, solange ich tatsächlich bspw. eine Eingabe in L3 vornehme und mit Return bestätige oder die Zelle sonst verlasse. Wenn jedoch L3 die Formel =A1/100 enthält, ich A1 ändere, startet das Makro nicht. Was kann ich tun?
2.) Eigentlich möchte ich als Range nur die Zellen L3:L4 und L6:L8 und L10:L12. Ich bekomme die Syntax oben nicht entsprechend geändert.

Vielen Dank für jeden Tipp.

 

set Target = Intersect(Target, Range("A1"))

nur wenige schauen auf Deinen Rechner und sehen die Datei.
Ich möchte gerne den Fehler im Original sehen.

Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.

Ein Nachbau sieht meist anders aus als das Original. <B>Darum sollte das Original verlinkt werden.</b>

Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
Hinweis - Anonymisierung und Pseudonymisierung von Beispielmappen - MS-Office-Forum
änderrn.
Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
Es sollte ein aussagekräftiger Name sein.

Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)3

Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

Bilder statt Datei | Excel ist sexy!

Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

Das ist nur meine Meinung zu dem Thema.

<a href="Homeseite - Hajo's Excelseiten" target="_blank" title="Hajo&#039;s Excelseiten">Gruß Hajo</a>

 

Vielen Dank.

Mein +A1/100 als Zellinhalt für L3 sollte nur beispielhaft sein. Sorry, dass ich das nicht deutlich gemacht habe. Tatsächlich sind die Formeln etwas aufwändiger: es gibt wenn() Abfragen, zum Teil Indirekt() auch mit Bezug zu anderen Tabellenblättern. Bedeutet das, dass ich tatsächlich jede einzelne Zelle auf die in den Formeln referenziert wird mit set Target = Intersect(Target, Range("XX")) abfragen muss?

 

ich bin dann raus, da meine Beitrag nicht komplett gelesen wurde.
Das wird schon seinen Grund haben.
Ich schreibe nicht für den Papierkorn. Ich bin dann raus.
Viel Erfolg noch.

Gruß Hajo