Hoe een macro uitvoeren wanneer de celwaarde verandert in Excel?
Normaal gesproken kunnen we in Excel op de F5-toets of de knop Uitvoeren drukken om de VBA-code uit te voeren. Maar heb je ooit geprobeerd de specifieke macrocode uit te voeren wanneer een celwaarde verandert? In dit artikel zal ik enkele snelle trucs introduceren om met deze taak in Excel om te gaan.
Voer een macro uit of bel deze wanneer een specifieke celwaarde verandert met VBA-code
Voer een macro uit of roep deze aan wanneer een celwaarde verandert in een bereik met VBA-code
Voer een macro uit of bel deze wanneer een specifieke celwaarde verandert met VBA-code
Om een macrocode uit te voeren door een celwaarde te wijzigen, kan de volgende VBA-code u een plezier doen, doe dit als volgt:
1. Klik met de rechtermuisknop op de bladtab waarop u de macro wilt uitvoeren als de celwaarde verandert, en kies vervolgens Bekijk code vanuit het contextmenu en in het geopende Microsoft Visual Basic voor applicaties venster, kopieer en plak de volgende code in de lege module:
VBA-code: voer een macro uit wanneer de celwaarde verandert:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call Mymacro
End If
End Sub
Note: In de bovenstaande code, A1 is de specifieke cel waarop u de code wilt uitvoeren op basis van, Mijn macro is de macronaam die u wilt uitvoeren. Wijzig ze naar uw behoefte.
2. En sla vervolgens het codevenster op en sluit het, nu, wanneer u de waarde invoert of wijzigt in cel A1, wordt de specifieke code onmiddellijk geactiveerd.
Voer een macro uit of roep deze aan wanneer een celwaarde verandert in een bereik met VBA-code
Als u een macro wilt uitvoeren of activeren wanneer een celwaarde in een celbereik verandert, kan de volgende code u helpen.
1. Klik met de rechtermuisknop op de bladtab waarop u de macro wilt uitvoeren als de celwaarde verandert, en kies vervolgens Bekijk code vanuit het contextmenu en in het geopende Microsoft Visual Basic voor applicaties venster, kopieer en plak de volgende code in de lege module:
VBA-code: voer een macro uit wanneer een celwaarde binnen een bereik verandert:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B100")) Is Nothing Then
Call Mymacro
End If
End Sub
Note: In de bovenstaande code, A1: B100 zijn de specifieke cellen waarop u de code wilt uitvoeren op basis van, Mijn macro is de macronaam die u wilt uitvoeren. Wijzig ze naar uw behoefte.
2. En sla vervolgens het codevenster op en sluit het. Als u nu een waarde invoert of wijzigt in een cel van A1: B100, wordt de specifieke code in één keer uitgevoerd.
Verwijder alle macro's uit meerdere werkmappen
Kutools for Excel's Batch Verwijder alle macro's hulpprogramma kan u helpen om alle macro's uit meerdere werkmappen te verwijderen als u dat nodig hebt. Download en gratis proef Kutools voor Excel nu!
Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Download en probeer nu gratis!
Gerelateerde artikelen:
Hoe macro automatisch uitvoeren voordat u afdrukt in Excel?
Hoe een macro uitvoeren op basis van de celwaarde in Excel?
Hoe een macro uitvoeren op basis van de geselecteerde waarde in de vervolgkeuzelijst in Excel?
Hoe voer ik een macro uit door op hyperlinks in Excel te klikken?
Hoe voer ik een macro uit wanneer het blad is geselecteerd uit een werkmap?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!