vba- code laten updaten

[Jamez]

hallo,

is het mogelijk de volgende code automatisch te laten bijwerken zodra er mutaties binnen de range plaatsvinden zonder dat ik de macro opnieuw moet runnen?

Sub GekleurdeCellenTellen()
For Each c In Range("g7:cz7")
If c.Interior.ColorIndex = 1 Then
x = x + 1
Else
End If
Range("E7").Value = x
Next
End Sub

ik moet nu als ik een cel "zwart" maak de macro opnieuw runnen

bij voorbaat dank

groeten Jamez

 

[Wigi]

hallo,

is het mogelijk de volgende code automatisch te laten bijwerken zodra er mutaties binnen de range plaatsvinden zonder dat ik de macro opnieuw moet runnen?

Sub GekleurdeCellenTellen()
For Each c In Range("g7:cz7")
If c.Interior.ColorIndex = 1 Then
x = x + 1
Else
End If
Range("E7").Value = x
Next
End Sub

ik moet nu als ik een cel "zwart" maak de macro opnieuw runnen

bij voorbaat dank

groeten Jamez

Enkel het kleuren van een cel kan je niet ondervangen in een gebeurtenis (event) in VBA. Je moet dus zelf wel Excel laten weten dat het moet hertellen. Bv. knop drukken.

Wigi

 

[Jamez]

okay,
dan weet ik dat. Moet ik enkele dingetjes aanpassen

vriendelijk bedankt!