MsgBox bij invoer in een cel.

[lobelvin]

Hallo,

ik heb volgende vraag, als in een reeks cellen, vb. van A1 tot A20 een gegeven ingevoerd wordt (gelijk wat in 1 of meerdere bepaalde cel(len) van dat gebied) zou er een MsgBox moeten verschijnen met een waarschuwing, deze MsgBox moet gewoon kunnen weg geklikt worden, (vb. door OK) dit moet enkel gebeuren wanneer een gegeven ingevoerd wordt en bij het verlaten van de cel, is dit mogelijk aub?

Vriendelijke groeten,
Danny

 

[HSV]

Zoiets dus.

Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Range("a1:a20")) Is Nothing Then MsgBox "klik weg"
End Sub

 

[lobelvin]

Hallo HSV,

Dit werkt naar behoren :thumb: hartelijk bedankt voor de moeite en oplossing.

Groeten,
Danny