Excel VBA színindex
Mint egy munkalapon, a VBA kezdőlapján is megváltoztatjuk egy cella vagy egy adott cellatartomány színét. Van egy színindexnek nevezett vba függvényünk, amelyet a cellák vagy a megadott cellatartomány színének megváltoztatására használunk. Ez a függvény egyedi azonosítással rendelkezik a különböző színtípusokhoz.
A VBA-ban kétféle módon alkalmazhatjuk a színt, az első a „color” tulajdonság, a második a „ColorIndex” tulajdonság.
Színt alkalmazunk a cellára háttérszínként, betűszínt és szegélyszínt alkalmazunk. Tehát a szín és színindex tulajdonság eléréséhez először ki kell választanunk a cellát.
Hogyan kell használni a Szín és színindex tulajdonságot?
# 1 - A Színtulajdonság használata
Tegyük fel, hogy az A1 cellában van a „Hello” szó. Meglátjuk, hogyan kell alkalmazni ennek a cellának a háttérszínét.
A háttérszín megváltoztatásához a színtulajdonságokban először meg kell említenünk a cella tartományát.
Kód:
Alszín () Tartomány ("A1") Vége Al
A cella kiválasztása után meg kell említenünk, hogy mit kell tennünk. Mint mondtam, meg kell változtatnunk a cella belső színét. Tehát a cella háttérszínének megváltoztatásához használja a „Interior” tulajdonságot.
Kód:
Alszín () Tartomány ("A1")
A Belső ingatlanok alatt számos más módszerrel és tulajdonsággal rendelkezünk. Mivel meg kell változtatnunk a cella színét, használjuk a színtulajdonságot.
Kód:
Alszín () Tartomány ("A1"). Interior.Color = End Sub
Itt 8 folyamatosan nevezett színt használhatunk. Az alábbiakban felsoroljuk ugyanazokat.
vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhiteVálassza ki a kívánt színtípust.
Kód:
Alszín () Tartomány ("A1"). Interior.Color = vbBlue End Sub
Ha ezt a kódot az F5 billentyűvel vagy manuálisan futtatom, akkor az A1 cella háttérszíne értékre változik .
Így használhat más állandó nevű színeket is. Próbálja meg használni őket az eredmény teszteléséhez.
Ezen 8 állandó színen kívül különböző színekkel is kitölthetjük az RGB funkció használatát a VBA-ban.
Kód:
Alszín () Tartomány ("A1"). Belső.Szín = RGB (Végső als
Számokban kell megadnunk a Piros, Zöld és Kék keveréket. Ennek használatához tökéletesnek kell lennie a számok megadásában. RGB- ként adtam meg a keveréket (250, 200, 150).
Kód:
Alszín () Tartomány ("A1"). Belső.Szín = RGB (250, 200, 150) Végső als
Ennek a színnek a változása ilyen.
A probléma itt az, hogy nem tudja pontosan, melyik szám milyen színt tartalmaz.
Az alábbi kód a betűszín színének megváltoztatására szolgál.
Kód:
Sub Color_Font () Tartomány ("A1"). Font.Color = RGB (100, 400, 100) Vége Sub
Futtassa ezt a kódot az F5 billentyűvel vagy manuálisan az eredmény eléréséhez.
# 2 - A Color Index tulajdonság használata
A színindex kissé eltér a színtulajdonságtól. A SZÍN tulajdonságban 8 állandó színt használunk, amelyeket a VBA adott, és az RGB funkciót is használva létrehozzuk a saját színünket.
A COLOR INDEX tulajdonság a VBA-ban korlátozott. Tarthatja az 1 és 56 közötti értékeket. Az 1 és 56 közötti számok különböző színeket tartalmaznak. Az alábbiakban felsoroljuk a listaszámokat és azok színeit.
Az alábbiakban látható az a makrokód, amely az A1 cella háttérszínét rózsaszínre változtatja.
Kód:
Sub ColorIndex_Cell () Range ("A1"). Interior.ColorIndex = 26 End Sub
Futtassa ezt a kódot manuálisan vagy az F5 billentyű segítségével az eredmény megtekintéséhez.
Az alábbiakban látható az a makró kód, amely az A1 cella betűszínét sárga színre változtatja.
Kód:
Sub ColorIndex_Font () Range ("A1"). Font.ColorIndex = 27 End Sub
Futtassa ezt a kódot az F5 billentyűvel, vagy futtathatja manuálisan, és megtekintheti az eredményt.
Az egyik fontos dolog, amire emlékeznünk kell, hogy számokat írhatunk be 1-től 56-ig. Ha bármi több, mint 56, akkor az „Subscript Out Out Range” hibát kapjuk.
Megfigyelted?
Mint elmondtam a Color Indexnek, a tulajdonság csak 56 színt képes beilleszteni, de az a helyzet, hogy csak 46 egyedi színt tud beilleszteni, és 10 színmásolat létezik. Az alábbiakban felsoroljuk az ismétlődő színkódok listáját.
