Du kan aktivere en makro i et Excel -ark når en celle tilsvarer en forhåndsdefinert verdi ved hjelp av følgende metoder:
1. Bruke Worksheet Change Event:
* trinn:
1. høyreklikk på kategorien Ark og velg " Vis kode ".
2. I VBA -redaktøren velger du " regneark "Fra" objektet "rullegardin og" Endring "Fra" prosedyren "Dropdown.
3. Skriv inn følgende kode:
`` VBA
Privat Sub Worksheet_Change (ByVal Target As Range)
Hvis Target.address ="$ a $ 1", så 'erstatt "$ a $ 1" med celleadressen
Hvis Target.Value ="YourPedefinedValue" da
Ring YourMaCroname 'Bytt ut "YourMaCroname" med det faktiske makronavnet
Slutt hvis
Slutt hvis
Slutt sub
`` `
* Erstatt `» $ a $ 1 »` med den faktiske celleadressen du vil overvåke.
* Erstatt `» Din forhåndsdefinerte verdi »` Med verdien du vil utløse makroen.
* Erstatt `» YourMaCroname »` Med det faktiske navnet på makroen du vil kjøre.
* Forklaring:
* Arbeidsark_change` -hendelsen utløser når en celleverdi endres i arket.
* Koden sjekker om den endrede cellen er den spesifiserte cellen og hvis verdien samsvarer med den forhåndsdefinerte verdien.
* Hvis begge forholdene er oppfylt, kaller den den spesifiserte makroen.
2. Bruke datavalidering:
* trinn:
1. Velg cellen du vil overvåke.
2. gå til data Tab og klikk på Validering av data .
3. I innstillingene Tab, velg tilpasset fra tillat rullegardin.
4. I formelen Felt, Enter:
`` `
=A1 ="YourPedefinedValue"
`` `
* Erstatt `» Dinpedefinedvalue »` Med den faktiske verdien du vil utløse makroen.
5. Gå til feilvarselet Tab og velg Vis feilvarsling etter at ugyldige data er lagt inn .
6. I feilmeldingen Felt, skriv inn følgende:
`` `
Denne cellen skal inneholde verdien "YourPedefinedValue"
`` `
* Erstatt `» YourPedefinedValue »` med den faktiske verdien.
7. Klikk OK For å lagre innstillingene.
8. høyreklikk På cellen og velg " Tilordne makro ".
9. Velg makroen du vil kjøre og klikk OK .
* Forklaring:
* Datavalidering begrenser cellen til bare å godta den forhåndsdefinerte verdien.
* Når brukeren oppgir en ugyldig verdi, vises en feilmelding, og makroen som er tilordnet cellen utføres.
3. Bruke en formel med en Worksheet_Calculate -hendelse:
* trinn:
1. Opprett En formel i en skjult celle som evaluerer til `sann 'når den overvåkede cellen tilsvarer den forhåndsdefinerte verdien. For eksempel i celle `b1`:
`` `
=A1 ="YourPedefinedValue"
`` `
* Erstatt `» YourPedefinedValue »` med den faktiske verdien.
2. høyreklikk på kategorien Ark og velg " Vis kode ".
3. I VBA -redaktøren velger du " regneark "Fra" objektet "rullegardin og" beregne "Fra" prosedyren "Dropdown.
4. Skriv inn følgende kode:
`` VBA
Privat sub -regneark_calculate ()
Hvis rekkevidde ("B1"). Verdi =sant, "erstatt" B1 "med cellen som inneholder formelen
Ring YourMaCroname 'Bytt ut "YourMaCroname" med det faktiske makronavnet
Rekkevidde ("b1"). Verdi =falsk 'tilbakestill cellen til falsk
Slutt hvis
Slutt sub
`` `
* Erstatt `» B1 '`med den faktiske celleadressen som inneholder formelen.
* Erstatt `» YourMaCroname »` Med det faktiske navnet på makroen du vil kjøre.
* Forklaring:
* Arbeidsarket_calculate` -hendelsen utløser når det oppstår en beregning i arket.
* Koden sjekker om verdien i formelcellen er "sant".
* Hvis det er "sant", kaller det den spesifiserte makroen og tilbakestiller formelcellen til å "falsk" for å forhindre gjentatt utførelse.
Velg den beste metoden basert på dine spesifikke krav og kompleksiteten i regnearket.
