---

Moin Moin!

Private Sub Worksheet_Calculate()
If Range("A1").Value = "wert" Then
MsgBox "Hier startet das Makro"
'
'
'
'
'
End If
End Sub

In diesem Makro muß ich den genauen Wert angeben. Wie muß ich es ändern, damit das Makro ab einen bestimmten Wert (also "größer als") ausgeführt wird?

------------------
Gruß, Heino

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,

Mach aus dem "=" ein ">".
Aber überleg genau, ob Du das wirklich beim Calculate-Ereignis haben möchtest (!)

Es springt so bei jedem Neurechnen an, also auch, wenn Du in XY4321 den Wert änderst.
Das kann die ganze Datei enorm ausbremsen. Schau Dir z.B. auch die Change-Ereignisse an, denen kann man ein target übergeben, womit man den abzuprüfenden Bereich einschränken kann.
Dazu gibt es schon was im Forum, bitte suchen.

------------------
Gruß,
runkelruebe          Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße...

System-Info | Dateianhänge | FAQ-ACAD | CAD.de-Hilfe | Sei eine Antilope

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP