Hallo allemaal,
't Is mischien heel simpel, maar ik kom er niet uit. Ik wil een msg box maken als bv in cel t1 de waarde van 263 is bereikt. Is het ook mogelijk, als de waarde in t1 250 is, een msg box te maken met de mededeling "U heeft nog 13 punten".
Groet van Wino

Beste

Zorg ervoor dat ergens op uw blad de waarde 263 staat
(bv t20) en t1 =250
Naast T1 zet u in de cel   =T20-T1   uitkomst is dan 13.
Ga naar celeigenschappen door op RMK te klikken, bij getal ga je naar aangepast dubbelklik op standaard in de balk en typ hier
"U heeft nog" 0 "punten" Klik op OK en zie het resultaat.
Vergeet de spaties niet voor de nul en na de nul.
Selecteren, kopiëren en plakken is het veiligst.

Groetjes Danny 147

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

Hoi Wino,

Dit is volgens mij wel mogelijk, maar je zou het ons makkelijker maken als je een voorbeeldje moest aanhangen. Dit maakt het ons makkelijker om jou opzet van je Excel bestand te begrijpen.

groetjes