Hvordan ændres værdi baseret på cellefarve i Excel?
Denne artikel taler om at ændre celleværdi automatisk baseret på dens baggrundsfarve i Excel. Hvis celler f.eks. Udfyldes med rød baggrundsfarve i markeringen, skal du udfylde disse celler med nummer 1, og for de blå baggrundsfarve celler skal du udfylde nummer 0.
Skift værdi baseret på cellefarve med VBA-kode
Skift værdi baseret på cellefarve med VBA-kode
Du kan køre nedenstående VBA-kode for at ændre værdi baseret på cellefarve i Excel. Gør som følger.
1. Vælg det område, du har brug for for at ændre værdier baseret på baggrundsfarve, og tryk derefter på andre + F11 taster samtidigt for at åbne Microsoft Visual Basic til applikationer vindue.
2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Moduler, kopier og indsæt derefter nedenstående VBA-kode i modulvinduet.
VBA-kode: Skift værdi baseret på cellefarve i Excel
Sub ChangeValueBasedOnCellColor()
Dim rg As Range
Dim xRg As Range
Set xRg = Selection.Cells
Application.DisplayAlerts = False
For Each rg In xRg
With rg
Select Case .Interior.Color
Case Is = 255 'Red
.Value = 1
Case Is = 15773696 'Blue
.Value = 0
End Select
End With
Next
Application.DisplayAlerts = False
End Sub3. Tryk på F5 nøgle til at køre koden, så kan du se alle røde celler i det valgte område er fyldt med nummer 1, og de blå celler er fyldt med nummer 0 som vist nedenstående skærmbillede.
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!
