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 funkció 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?
Ezt a VBA színindex sablont innen töltheti le - VBA színindex sablont# 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 vbBlue- ra 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ín mellett 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 COLOR tulajdonságban 8 állandó színt használunk, amelyeket a VBA ad meg, és az RGB funkció használatával saját színt is létrehozunk.
A COLOR INDEX tulajdonság a VBA-ban korlátozott, az értékeket 1-től 56-ig tarthatja. Az 1-től 56-ig terjedő 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 manuálisan futtathatja, é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 56-nál nagyobb értéket kapunk, akkor az „Subscript Out Out Range” hibát kapjuk.
Megfigyelted?
Mint mondtam, a Color Index tulajdonság csak 56 színt képes beilleszteni, de az a tény, hogy csak 46 egyedi színt tud beilleszteni, és 10 másolat van. Az alábbiakban felsoroljuk az ismétlődő színkódok listáját.