Hvordan køres automatisk makro, når resultatet af celleformlen ændres?
Antag, jeg har en liste over formler baseret på dataene i kolonne A og kolonne B som følgende skærmbillede vist, nu vil jeg køre en bestemt makrokode automatisk, når formelresultatet ændres med dets relative celler ændres. Er der nogen god idé at løse dette job i Excel?
Kør automatisk makro, når celleformelresultatet ændres med VBA-kode
Kør automatisk makro, når celleformelresultatet ændres med VBA-kode
Følgende VBA-kode kan hjælpe dig med at udføre en bestemt kode automatisk, når formelresultatcellen ændres, gør venligst som dette:
1. Højreklik på den arkfane, du vil bruge, og vælg derefter Vis kode fra genvejsmenuen i det åbnede Microsoft Visual Basic til applikationer vindue, kopier og indsæt følgende kode i det tomme modul:
VBA-kode: Kør automatisk makro, når resultatet af celleformlen ændres:
Private Sub Worksheet_Calculate()
'Updateby Extendoffice
Dim Xrg As Range
Set Xrg = Range("C2:C8")
If Not Intersect(Xrg, Range("C2:C8")) Is Nothing Then
Macro1
End If
End Sub
Bemærk: I ovenstående kode, C2: C8 er det område af formelceller, som du vil bruge ,maco1 er navnet på den makro, du vil køre automatisk. Skift det til dit behov.
2. Gem og luk derefter dette kodevindue, når dataene i området A2: B8 ændres for at forårsage ændringer i formelresultatet, udløses din specifikke makrokode med det samme.
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!