Office: (Office 2007) Makros ausführen, wenn sich der Inhalt einer Zelle ändert

Hallo zusammen,

ich möchte zwei Makros welche ich schon geschrieben habe ausführen sobald sich der Inhalt einer konkreten Zelle durch eine Berechnung geändert hat. Diese Zelle ist fix.
Leider bin ich bisher hier noch nicht fündig geworden bzw. ich weiß nicht ganz wie ich die Worksheet_Change Methode oder Worksheet_Calculate anwenden muss.
Kann mir dies bitte jemand erläutern.
Muss ich ein ganzes Makro so nennen und die anderen beiden Makros darin aufrufen? Oder wie funktioniert das.

:)

 

Moin, bergziege,

zuerst einmal sollte festgestellt werden, wie sich der Inhalt der festen Zelle ändert: durch direkte Zelleingabe (dann greift das Workshet_Change-Ereignis) oder durch Berechnung (dann sollte ggf. das Ereignis Calculate verwendet werden). Bei einer direkten Eingabe sollte hinter der Tabelle, in der sich die Zelle befindet, z.B. folgender Code eingegeben werden:

Code:

Die Makros befinden sich bei mir in der gleichen Mappe in einem allgemeinen Modul:

Code:

 

hallo jinx,

vilen Dank für deine Antwort. Ich habe das gerade getestet. Hat auch super funktioniert, wenn ich das Feld manuell ändere. Ich möchte jedoch, dass sich der Inhalt des Feldes errechnet. Ich habe einfach Worksheet_Change durch Worksheet_Calculate ersetzt.
Darauf bekomme ich folgende Fehlermeldung:"Fehler beim Kompilieren: Deklaration der Prozedur entspricht nicht der Beschreibung eines Ereignisses oder einer Prozedur mit demselben Namen".

Was soll der Code leisten?
Ich bestimme in einem Feld H7 den Saldo aus der Summe von Kosten und Summe der Einnahmen. Wenn der Saldo =0) grün.

Code:

Der Code für das Einfärben steht in Modul1 in einem anderen Ordner
Code:

Was mache ich falsch?

 

Moin, [bergziege,

den Aufruf des Ereignises so übernehmen, wie Excel ih vorsieht, nicht wie Du meinst, dass er sein sollte. Nur ein Ereignis, welches hinter der Tabelle steht und den Wert der Zelle H7 auswertet, wenn eine Neuberechnung stattfindet (dies kann bei komplexeren Berechnungen zu Verzögerungen führen):

Code:

 

Hi Sven,

Code:

Calculate erwartet keine Parameter. Zelle H7 wertest Du ja in der Prozedur Einfärben aus...

 

Hi Jinx, hi Ralf,

danke euch beiden. Jetzt funktioniert es so wie es soll. Danke auch für die einfachere bzw. codesparendere Variante von Jinx.

 

Hallo Bergziege,

du willst Code sparen? *mrcool

Code:

 

hallo leute

super forum hier, hab mich gleich mal angemeldet. ich hab ein ähnliches problem. hab auch hier schon hilfe gefunden, doch leider führt sich dieses makro oft aus (bildschirm lädt sich ca. 100 mal neu, glaube das makro führt sich so oft selber aus).

hier mein code:

rivate Sub Worksheet_Calculate()
With Range("N16")
If .Value = 1 Then
Rows("18").Hidden = True

Else
Rows("18").Hidden = False

End If
End With
End Sub

mein Ziel ist es, die Werte der Zellen zu löschen und eine Zeile auszublenden, wenn sich der WErt in der zelle n16 von 1 auf 2 ändert. Dies soll aber nur einmal ausgeführt werden, weil ich dann wieder werte reinschreiben möchte.

mfg

 

Hallo Mario,

so sollte es funktionieren:
Code:

 

Hallo, berziege

für den von dir geschilderten einfachen Fall genügt es schon, die Bordmittel von Excel (ab 2000) der bedingten Formatierung zu nutzen:
Dort können bis zu 3 Bedingungen geprüft und abhängig davon Zellen formatiert werden, so z. B. bei Unterschreiten von 0 durch des Wert der Zelle.
Schau mal unter Menüleiste -> Format -> bedingte Formatierung.
Ist eigentlich ein recht nettes Feature und benötigt keinen Code.

Ansonsten ist das Beispiel oben ein erster Einstieg in die Event-Prozeduren unter Excel.

Gruß
Klaus