Hvordan køres makro, når celleværdien ændres i Excel?
Normalt kan vi i Excel trykke på F5-tasten eller Kør-knappen for at udføre VBA-koden. Men har du nogensinde prøvet at køre den specifikke makrokode, når en celleværdi ændres? Denne artikel vil jeg introducere nogle hurtige tricks til at håndtere dette job i Excel.
Kør eller ring makro, når en bestemt celleværdi ændres med VBA-kode
Kør eller ring makro, når en celleværdi ændres i et område med VBA-kode
Kør eller ring makro, når en bestemt celleværdi ændres med VBA-kode
For at køre en makrokode ved at ændre en celleværdi, kan følgende VBA-kode gøre dig en tjeneste, gør venligst som denne:
1. Højreklik på arkfanen, som du vil udføre makroen, hvis celleværdien ændres, og vælg derefter Vis kode fra genvejsmenuen og i det åbnede Microsoft Visual Basic til applikationer vindue, kopier og indsæt følgende kode i det tomme modul:
VBA-kode: Kør makro, når celleværdien ændres:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call Mymacro
End If
End Sub
Bemærk: I ovenstående kode, A1 er den specifikke celle, som du vil køre koden baseret på, Mymacro er det makroenavn, du vil køre. Skift dem til dit behov.
2. Og gem og luk derefter kodevinduet, når du indtaster eller ændrer værdi i celle A1, udløses den specifikke kode med det samme.
Kør eller ring makro, når en celleværdi ændres i et område med VBA-kode
Hvis du vil køre eller udløse en makro, når nogen celleværdi ændres i et celleområde, kan følgende kode hjælpe dig.
1. Højreklik på arkfanen, som du vil udføre makroen, hvis celleværdien ændres, og vælg derefter Vis kode fra genvejsmenuen og i det åbnede Microsoft Visual Basic til applikationer vindue, kopier og indsæt følgende kode i det tomme modul:
VBA-kode: Kør makro, når en hvilken som helst celleværdi ændres i et interval:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B100")) Is Nothing Then
Call Mymacro
End If
End Sub
Bemærk: I ovenstående kode, A1: B100 er de specifikke celler, som du vil køre koden baseret på, Mymacro er det makroenavn, du vil køre. Skift dem til dit behov.
2. Og gem derefter og luk kodevinduet, når du indtaster eller ændrer værdi i en hvilken som helst celle i A1: B100, udføres den specifikke kode med det samme.
Fjern alle makroer fra flere projektmapper
Kutools til Excel's Batch Fjern alle makroer hjælpeprogram kan hjælpe dig med at fjerne alle makroer fra flere projektmapper, som du har brug for. Download og gratis prøveversion Kutools til Excel nu!
Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!
Relaterede artikler:
Hvordan køres makro automatisk inden udskrivning i Excel?
Hvordan køres makro baseret på celleværdi i Excel?
Hvordan køres makro baseret på værdi valgt fra rullelisten i Excel?
Hvordan køres makro ved at klikke på hyperlinks i Excel?
Hvordan køres makro, når ark er valgt fra en projektmappe?
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!