Office: Makro auslösen, wenn sich Zellenwert durch Formel ändert

Hallo zusammen,

ich sitze seit Stunden an einem Problem und habe mich durch ettliche Googlesuchen geklickt, konnte es aber bisher nicht lösen.

Die Situation:

Ich habe eine Zelle, in der über die Formel =Kalenderwoche immer die aktuelle Kalenderwoche angezeigt wird. nun soll diese Zelle ein Makro auslösen, wenn sich die Kalenderwoche durch die dahinter liegende Formel ändert.

Aktuell stehe ich hier:


Private Sub Worksheet_Calculate()
Dim target As Range
Set target = Range("B4")

If Not Intersect(target, Range("B4")) Is Nothing Then
call Wochenwechsel
End If
End Sub

B4 ist die zu überwachende Zelle und "Wochenwechsel" der Name meines Makros.


Das ganze gerät bei einer Änderung in B4 jedoch in eine Endlosschleife und das Makro wird konstant ausgeführt bis Excel abstürzt.
(das Makro funktioniert selbst einwandfrei und macht genau was es soll wenn es manuell gestartet wird)

Ich hoffe sehr mir kann jemand weiterhelfen. Ich bin leider noch ziemlicher VBA Anfänger.

Vielen Dank

:)

 

Hi,

mache es mit dem Change-Ereignis des Tabellenblattes und überwache nicht die Zelle mit der Formel sondern die Zelle, auf die sich die Formel bezieht.

 

... wobei diese Zelle manuell wertgeändert werden muss und daher keine Formel enthält. Sogar ein Überkopieren klappt dann nicht (unbedingt).

Für Beispiele für das Change-Ereignis google Worksheet_Change.

 

Hallo maomao90!

Das Calculate Ereigniss sollte eher durch Volatiles verhalten einiger Funktionen gemieden werden!

Gruß Michael

Hier einige Volatile Funktionen!

BEREICH.VERSCHIEBEN
HEUTE
INDIREKT
INFO
JETZT
ZELLE (mit Parameter “Dateiname”)
ZUFALLSBEREICH
ZUFALLSZAHL
MATRIXFORMELN



Online - Excel: !Langsames Excel (1) - Volatile Funktionen

 

*kopfkratz*

wirklich?

 

Hallo EarlFred!

Liste war aus dem Netz kopiert und wurde von mir nicht geprüft!
Ich habe mich auf die Kompetenz erfahrener User verlassen!
Wenn dem nicht so ist,dann ist es nun geklärt!

Gruß Michael

 

Statt kopieren dann besser verlinken!

Damit machst Du Dir weder fremdes Wissen zu eigen, noch übernimmst Du die Haftung für Fehler, die sich dann immer weiter fortsetzen. Ist beides gravierend!

 

...wobei ich weder im verlinkten Video (Kurzdurchlauf...) noch Online-Excel-Artikel die Aussage zu Matrixformeln finde.

 

Vielen Dank für die vielen Antworten,

die Zelle auf die sich die Kalenderwochen-Formel bezieht ist auch eine Formel (=Heute()).

Ziel ist, dass sich das Makro selbstständig beim öffnen der Excel Datei in einer neuen Kalenderwoche ausführt, ohne dass durch den Benutzer irgendwo manuell durch worksheet change etwas getriggert werden muss.

zu den volatilen Funktionen: Ich habe mal versuchshalber die Formel in der zu überwachenden Zelle durch eine einfache Addition ersetzt um zu schauen ob es an der spezifischen Formel liegt aber es trat dasselbe Problem auf.

sobald sich die betroffene Zelle ändert wird das Makro immer aufs neue ausgeführt bis Excel abstürzt.

Gibt es eventuell einen Umweg um festzulegen, dass das Makro nur einmal ausgeführt werden kann nachdem es über die Calculate Funktion getriggert wurde?

 

Workbook_Open?

 

Hallo,

Ändere das Konzept: Schmeiß die Formel raus und lösch den Inhalt der Zelle. Nutze dann das Workbook-Open Ereignis, um die Kalenderwoche im Code zu errechnen, diese mit der in der Zelle stehenden KW zu vergleichen. Bei einer Abweichung den neuen Wert eintragen und die andere Prozedur starten.

Grüße
EarlFred