Sut i redeg macro pan fydd gwerth celloedd yn newid yn Excel?
Fel rheol, yn Excel, gallwn wasgu allwedd F5 neu botwm Run i weithredu'r cod VBA. Ond, a ydych erioed wedi ceisio rhedeg y cod macro penodol pan fydd gwerth cell yn newid? Yr erthygl hon, byddaf yn cyflwyno rhai triciau cyflym i ddelio â'r swydd hon yn Excel.
Rhedeg neu ffonio macro pan fydd gwerth cell penodol yn newid gyda chod VBA
Rhedeg neu ffonio macro pan fydd unrhyw werth cell yn newid mewn ystod gyda chod VBA
Rhedeg neu ffonio macro pan fydd gwerth cell penodol yn newid gyda chod VBA
I redeg cod macro trwy newid gwerth cell, gall y cod VBA canlynol ffafrio chi, gwnewch fel hyn:
1. Cliciwch ar y dde ar y tab dalen rydych chi am weithredu'r macro os yw gwerth celloedd yn newid, ac yna dewiswch Gweld y Cod o'r ddewislen cyd-destun, ac yn yr agoriad Microsoft Visual Basic ar gyfer cymwysiadau ffenestr, copïo a gludo'r cod canlynol i'r Modiwl gwag:
Cod VBA: Rhedeg macro pan fydd gwerth celloedd yn newid:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call Mymacro
End If
End Sub
Nodyn: Yn y cod uchod, A1 yw'r gell benodol rydych chi am redeg y cod yn seiliedig arni, Mymacro yw'r enw macro rydych chi am ei redeg. Os gwelwch yn dda eu newid i'ch angen.
2. Ac yna arbed a chau ffenestr y cod, nawr, pan fyddwch chi'n nodi neu'n newid gwerth yng nghell A1, bydd y cod penodol yn cael ei sbarduno ar unwaith.
Rhedeg neu ffonio macro pan fydd unrhyw werth cell yn newid mewn ystod gyda chod VBA
Os ydych chi am redeg neu sbarduno macro pan fydd unrhyw werth cell yn newid mewn ystod o gell, gall y cod canlynol eich helpu chi.
1. Cliciwch ar y dde ar y tab dalen rydych chi am weithredu'r macro os yw gwerth celloedd yn newid, ac yna dewiswch Gweld y Cod o'r ddewislen cyd-destun, ac yn yr agoriad Microsoft Visual Basic ar gyfer cymwysiadau ffenestr, copïo a gludo'r cod canlynol i'r Modiwl gwag:
Cod VBA: Rhedeg macro pan fydd unrhyw werth cell yn newid mewn ystod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B100")) Is Nothing Then
Call Mymacro
End If
End Sub
Nodyn: Yn y cod uchod, A1: B100 yw'r celloedd penodol rydych chi am redeg y cod yn seiliedig arnyn nhw, Mymacro yw'r enw macro rydych chi am ei redeg. Os gwelwch yn dda eu newid i'ch angen.
2. Ac yna arbed a chau ffenestr y cod, nawr, pan fyddwch chi'n nodi neu'n newid gwerth yng nghell unrhyw un o A1: B100, gweithredir y cod penodol ar unwaith.
Tynnwch yr holl macros o lyfrau gwaith lluosog
Kutools ar gyfer Excel's Swp Tynnwch yr holl Macros gall cyfleustodau eich helpu i gael gwared ar yr holl macros o lyfrau gwaith lluosog yn ôl yr angen. Dadlwythwch a threial am ddim Kutools ar gyfer Excel nawr!
Kutools ar gyfer Excel: gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. Dadlwythwch a threial am ddim Nawr!
Erthyglau cysylltiedig:
Sut i redeg macro yn awtomatig cyn argraffu yn Excel?
Sut i redeg macro yn seiliedig ar werth celloedd yn Excel?
Sut i redeg macro yn seiliedig ar werth a ddewiswyd o'r gwymplen yn Excel?
Sut i redeg macro trwy glicio hypergysylltiadau yn Excel?
Sut i redeg macro pan ddewisir taflen o lyfr gwaith?
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!