Sut i redeg macro yn seiliedig ar werth celloedd yn Excel?
Gan dybio, mae gen i godau macro lluosog yn fy llyfr gwaith, a nawr, rydw i eisiau rhedeg y codau hyn yn seiliedig ar werth y gell. Yr erthygl hon, byddaf yn siarad am sawl sefyllfa y gallech eu dioddef yn eich gwaith bob dydd wrth ddefnyddio Excel.
Rhedeg neu sbarduno macro os yw gwerth celloedd yn fwy neu'n llai na gwerth penodol gyda chod VBA
Rhedeg neu sbarduno macro os yw gwerth celloedd yn cyfateb i destun penodol â chod VBA
Rhedeg neu sbarduno macro os yw gwerth celloedd yn fwy neu'n llai na gwerth penodol gyda chod VBA
Er enghraifft, os yw'r gwerth yng nghell A1 rhwng 10 a 50, rhedeg macro1, ac os yw'r gwerth yn fwy na 50, rhedeg macro2. I ddatrys y swydd hon yn Excel, cymhwyswch y cod VBA canlynol.
1. Cliciwch ar y dde ar y tab dalen rydych chi am weithredu'r macro yn seiliedig ar werth cell, 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 os yw gwerth celloedd yn fwy neu'n llai na:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Cells.Count > 1 Then Exit Sub
If IsNumeric(Target) And Target.Address = "$A$1" Then
Select Case Target.Value
Case 10 To 50: Macro1
Case Is > 50: Macro2
End Select
End If
End Sub
Nodyn: Yn y cod uchod:
A1 yw'r gell sy'n cynnwys y gwerth penodol rydych chi am redeg y macro yn seiliedig arno;
Achos 10 I 50: Macro1: mae'n golygu os yw'r gwerth rhwng 10 a 50, rhedeg Macro1;
Achos Is> 50: Macro2: mae'n golygu os yw'r gwerth yn fwy na 50, rhedeg Macro2.
Newidiwch y macro enwau a meini prawf hyn i'ch angen, a gallwch hefyd ychwanegu mwy o feini prawf yn dilyn y achos sgript.
2. Yna arbedwch a chau y ffenestr god hon, nawr, pan fydd y gwerth rydych chi'n ei nodi rhwng 10 a 50 yng nghell A1, bydd Macro1 yn cael ei sbarduno, os yw'r gwerth a gofnodwyd yn fwy na 50, gweithredir Macro2.
Rhedeg neu sbarduno macro os yw gwerth celloedd yn cyfateb i destun penodol â chod VBA
Os ydych chi am sbarduno'r macro yn seiliedig ar destun penodol mewn cell, er enghraifft, i redeg y macro1 os yw'r testun “Delete” wedi'i nodi, a rhedeg macro2 os yw'r testun “Insert” wedi'i deipio. Gall y cod canlynol ffafrio chi.
1. Cliciwch ar y dde ar y ddalen rydych chi am weithredu'r macro yn seiliedig ar werth y gell, 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 os yw gwerth cell yn destun penodol
Sub worksheet_change(ByVal target As Range)
Set target = Range("A1")
If target.Value = "Delete" Then
Call Macro1
End If
If target.Value = "Insert" Then
Call Macro2
End If
End Sub
Nodyn: Yn y cod uchod, “Dileu"A"Mewnosod”Yw'r testunau celloedd rydych chi am redeg macros yn seiliedig arnyn nhw, a Macro1 ac Macro2 yw'r macros rydych chi am eu gweithredu yn seiliedig ar destun. Os gwelwch yn dda eu newid i'ch angen.
2. Yna cadwch y cod hwn a chau'r ffenestr, nawr, pan fyddwch chi'n nodi'r testun "Delete" yng nghell A1, mae macro1 yn cael ei sbarduno, os yw'r testun "Mewnosod" yn cael ei nodi, bydd macro2 yn cael ei weithredu.
Erthyglau cysylltiedig:
Sut i redeg macro pan fydd gwerth celloedd yn newid yn Excel?
Sut i redeg macro yn awtomatig cyn argraffu 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!