Hallo wino,
wat jij wilt is een macro om dit automatisch te laten gebeuren.
zou er
ongeveer zo moeten uitzien:
Private Sub Worksheet_Change(ByVal Target As Range)
target.value = ("A1")
if target<265 then
MsgBox ("U hebt nog &265-target& punten")
Else
MsgBox ("U hebt geen punten meer over")
End if
End Sub
Nu weet ik dat dit niet af is, je gaat in een "loop" belanden, dus moet je in de MsgBox gaan werken met vbYesNo en zo de stap in de macro onderbreken.
Spijtig genoeg ben ik geen kei in VBA, én ontbreekt mij op dit ogenblik de tijd om mij er intensief mee bezig te houden.
Misschien heb ik je toch al op de goede weg gezet.
SoftAid