VBA farveindeks | Topmåder at bruge farveindeksegenskab i Excel VBA

Excel VBA farveindeks

Som i et regneark ændrer vi farven på en celle eller et givet celleområde fra fanen Hjem i VBA. Vi har en vba-funktion kaldet Colour Index, der bruges til at ændre cellernes farver eller celleområdet, disse funktioner har unik identifikation til forskellige typer farver.

I VBA har vi to måder at anvende farven på, den første er ved hjælp af "farve" egenskab og den anden bruger "ColorIndex" egenskaben.

Vi anvender farve på cellen som baggrundsfarve, vi anvender skriftfarve, og vi anvender kantfarve. Så for at få adgang til farve- og farveindeksegenskaber skal vi først vælge cellen.

Hvordan bruger jeg farve- og farveindeksegenskaber?

Du kan downloade denne VBA farveindeksskabelon her - VBA farveindeksskabelon

# 1 - Brug af farveegenskaber

Antag at du har ordet “Hej” i cellen A1. Vi vil se, hvordan du anvender baggrundsfarven på denne celle.

For at ændre baggrundsfarven skal vi i farveregenskaber først nævne celleområdet.

Kode:

 Underfarve () Område ("A1") Afslut Sub 

Når vi har valgt cellen, skal vi nævne, hvad der er den ting, vi skal gøre. Som jeg sagde, er vi nødt til at ændre den indvendige farve på cellen. Så for at ændre baggrundsfarven på cellen skal du bruge egenskaben "Interiør".

Kode:

 Underfarve () Område ("A1") 

Under Interiør ejendom har vi flere andre metoder og egenskaber. Da vi har brug for at ændre farven på cellen, skal du bruge farveegenskaben.

Kode:

 Underfarve () Område ("A1") Interior.Color = End Sub 

Her kan vi bruge 8 konstant navngivne farver. Nedenfor er listen over det samme.

vbBlack, vbRed, vbGreen, vbBlue, vbGul, vbMagenta, vbCyan, vbWhite

Vælg farvetype efter dit ønske.

Kode:

 Sub Color () Range ("A1") Interior.Color = vbBlue End Sub 

Hvis jeg kører denne kode ved hjælp af F5-tasten eller manuelt, vil den ændre baggrundsfarven på cellen A1 til vbBlue.

På denne måde kan du bruge andre konstant navngivne farver. Prøv at bruge dem til at teste resultatet.

Bortset fra disse 8 konstante farver kan vi også udfylde med forskellige farver ved at bruge RGB-funktion i VBA.

Kode:

 Sub Color () Range ("A1") Interior.Color = RGB (End Sub 

Vi skal indtaste blandingen af ​​rød, grøn og blå i tal. For at bruge dette skal du være perfekt til at indtaste numrene. Jeg har indtastet blandingen som RGB (250, 200, 150).

Kode:

 Sub Color () Range ("A1") Interior.Color = RGB (250, 200, 150) End Sub 

Ændring af denne farve er sådan.

Problemet her er, at du ikke ved nøjagtigt, hvilket nummer der indeholder hvilken farve.

Nedenstående kode er at ændre skriftfarven.

Kode:

 Sub Color_Font () Range ("A1") Font.Color = RGB (100, 400, 100) End Sub 

Kør denne kode ved hjælp af F5-tasten eller manuelt for at få resultatet.

# 2 - Brug af farveindeksegenskab

Farveindeks adskiller sig lidt fra farveegenskaben. I FARVE egenskab bruger vi 8 konstante farver givet af VBA og også ved hjælp af RGB-funktion skaber vi vores egen farve.

FARVEINDEKS-egenskaben er begrænset i VBA, den kan indeholde værdierne fra 1 til 56. Hvert tal fra 1 til 56 har forskellige farver. Nedenfor er listenumrene og deres respektive farver.

Nedenfor er makrokoden for at ændre baggrundsfarven på cellen A1 til lyserød.

Kode:

 Sub ColorIndex_Cell () Range ("A1"). Interior.ColorIndex = 26 End Sub 

Kør denne kode manuelt eller ved hjælp af F5-tasten for at se resultatet.

Nedenfor er makrokoden for at ændre skriftfarven på cellen A1 til gul.

Kode:

 Sub ColorIndex_Font () Range ("A1") Font.ColorIndex = 27 End Sub 

Kør denne kode ved hjælp af F5-tasten, ellers kan du køre manuelt og se resultatet.

En af de vigtige ting at huske her er, at vi kan indtaste tal fra 1 til 56. Hvis noget mere end 56, får vi fejlen "Subscript Out of Range".

Har du observeret det?

Som jeg fortalte kan Color Index ejendom kun indsætte 56 farver, men faktum er, at det kun kan indsætte 46 unikke farver, og der er 10 duplikerede farver. Nedenfor er listen over duplikatfarvekoder.