Hoe toon je een pop-upberichtvenster wanneer de celwaarde binnen een bepaald bereik in Excel wordt gewijzigd?
Soms is het handig om direct op de hoogte te worden gesteld van wijzigingen binnen een bepaald bereik op uw werkblad. Een pop-upbericht waarschuwt u zodra de waarde van een cel in dat bereik verandert — en dat kunt u eenvoudig realiseren met de VBA-methode uit dit artikel.
Pop-upberichtvenster weergeven als de celwaarde binnen een bereik wijzigt met VBA-code
Pop-upberichtvenster weergeven als de celwaarde binnen een bereik wijzigt met VBA-code
De volgende VBA-code toont een pop-upberichtvenster zodra de celwaarde verandert binnen een beperkt bereik op een specifiek werkblad. Volg deze stappen.
1. Druk tegelijkertijd op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Dubbelklik in het venster Microsoft Visual Basic for Applications in de linkerbalk op de bladnaam (waarop Beperkt bereik zich bevindt) om het Code-venster te openen, en plak vervolgens de onderstaande VBA-code in dat venster.
VBA-code: pop-upberichtvenster weergeven als de celwaarde binnen een bereik wijzigt
Private Sub Worksheet_Change(ByVal Target As Range)
If Not (Application.Intersect(Range("A1:E19"), Target) Is Nothing) Then
MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
End If
End Sub Opmerking: u kunt het bereik Beperkt bereik A1:E19 in de code aanpassen naar het gewenste bereik.

3. Druk tegelijkertijd op Alt + Q om het venster Microsoft Visual Basic for Applications te sluiten.
Vanaf nu verschijnt er automatisch een berichtvenster zodra celwaarden in het bereik A1:E19 worden gewijzigd. Zie onderstaande afbeelding:


Ontgrendel de magie van Excel met KUTOOLS AI
- Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
- aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
- VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules moeiteloos.
- Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins