U kunt een macro in een Excel -blad activeren wanneer een cel gelijk is aan een vooraf gedefinieerde waarde met behulp van de volgende methoden:
1. Evenement met werkbladverandering gebruiken:
* stappen:
1. Klik met de rechtermuisknop Op het tabblad Blad en selecteer " Code bekijken ".
2. Selecteer in de VBA -editor " werkblad "Van het" object "Dropdown en" wijzigen "Van de" procedure "Dropdown.
3. Voer de volgende code in:
`` `vba
Private Sub -werkblad_change (ByVal Target As Range)
Als target.address ="$ a $ 1" vervolgens vervolgens "$ a $ 1" vervangen door het celadres
Als target.value ="yourPredefinedValue" dan
Bel je Macroname 'Vervang' yourmacroname 'door de werkelijke macro -naam
Eindig als
Eindig als
Einde sub
`` `
* Vervang `" $ a $ 1 "` door het werkelijke celadres dat u wilt controleren.
* Vervang `" YourPredefinedValue "" door de waarde die u de macro wilt activeren.
* Vervang `" yourmacroname "` door de werkelijke naam van de macro die u wilt uitvoeren.
* Verklaring:
* De gebeurtenis `Worksheet_change` activeert wanneer een celwaarde in het blad wordt gewijzigd.
* De code controleert of de gewijzigde cel de opgegeven cel is en als de waarde ervan overeenkomt met de vooraf gedefinieerde waarde.
* Als aan beide voorwaarden wordt voldaan, roept het de opgegeven macro aan.
2. Gegevensvalidatie gebruiken:
* stappen:
1. Selecteer de cel die u wilt controleren.
2. Ga naar de data tabblad en klik op gegevensvalidatie .
3. In de instellingen Tab, kies aangepast Van de toestaan vervolgkeuzelijst.
4. In de formule Veld, Enter:
`` `
=A1 ="YourPredefinedValue"
`` `
* Vervang `" YourPredefinedValue "" door de werkelijke waarde die u de macro wilt activeren.
5. Ga naar de foutwaarschuwing tabblad en kies Foutmelding weergeven nadat ongeldige gegevens zijn ingevoerd .
6. In het foutbericht Veld, voer het volgende in:
`` `
Deze cel moet de waarde "YourPredefinedValue" bevatten
`` `
* Vervang `" YourPredefinedValue "` door de werkelijke waarde.
7. Klik op OK om de instellingen op te slaan.
8. Klik met de rechtermuisknop Op de cel en selecteer " Macro toewijzen ".
9. Kies de macro die u wilt uitvoeren en klik op OK .
* Verklaring:
* Gegevensvalidatie beperkt de cel om alleen de vooraf gedefinieerde waarde te accepteren.
* Wanneer de gebruiker een ongeldige waarde invoert, verschijnt er een foutmelding en wordt de aan de cel toegewezen macro uitgevoerd.
3. Een formule gebruiken met een werkblad_calculate -gebeurtenis:
* stappen:
1. Creëer Een formule in een verborgen cel die evalueert tot 'true' wanneer de bewaakte cel gelijk is aan de vooraf gedefinieerde waarde. Bijvoorbeeld in cel `b1`:
`` `
=A1 ="YourPredefinedValue"
`` `
* Vervang `" YourPredefinedValue "` door de werkelijke waarde.
2. klik met de rechtermuisknop Op het tabblad Blad en selecteer " Code bekijken ".
3. Selecteer in de VBA -editor " werkblad "Van het" object "Dropdown en" berekenen "Van de" procedure "Dropdown.
4. Voer de volgende code in:
`` `vba
Private Sub -werkblad_calculate ()
If bereik ("b1"). Waarde =true dan vervolgens "B1" vervangen door de cel die de formule bevat
Bel je Macroname 'Vervang' yourmacroname 'door de werkelijke macro -naam
Bereik ("b1"). Value =false 'reset de cel naar false
Eindig als
Einde sub
`` `
* Vervang `" b1 "` door het werkelijke celadres dat de formule bevat.
* Vervang `" yourmacroname "` door de werkelijke naam van de macro die u wilt uitvoeren.
* Verklaring:
* De gebeurtenis `Worksheet_Calculate` activeert wanneer er een berekening in het blad plaatsvindt.
* De code controleert of de waarde in de formulecel 'true' is.
* Als het 'true' is, roept het de opgegeven macro aan en reset de formulecel vervolgens op 'false' om herhaalde uitvoering te voorkomen.
Kies de beste methode op basis van uw specifieke vereisten en de complexiteit van uw spreadsheet. |