Cuprins
În acest articol, vă voi arăta cum puteți folosi ColorIndex proprietate în Excel VBA Veți învăța să setați culoarea fundalului, a fontului și a marginii uneia sau mai multor celule folosind proprietatea ColorIndex din VBA , precum și pentru a seta culoarea unei celule în funcție de cea a alteia.
Coduri Excel VBA ColorIndex
Înainte de a trece la discuția principală, uitați-vă la imaginea de mai jos pentru a cunoaște ColorIndex a tuturor culorilor disponibile în Excel VBA .
Descărcați caietul de practică
Descărcați acest caiet de exerciții pentru a vă antrena în timp ce citiți acest articol.
VBA ColorIndex.xlsm4 Exemple de utilizare a proprietății ColorIndex în Excel VBA
Aici avem un set de date cu Nume, salarii de pornire , și Salarii actuale a unor angajați ai unei companii numite Jupyter Group.
Obiectivul nostru este de a vedea diferite utilizări ale ColorIndex proprietate a VBA pe acest set de date.
1. Setați culoarea de fundal a celulei utilizând ColorIndex în Excel VBA
Puteți seta culoarea de fundal a celulei la orice doriți, folosind opțiunea ColorIndex proprietate a VBA .
Să schimbăm culoarea de fundal a intervalului B4:B13 la verde.
⧭ Cod VBA:
Linia de cod va fi:
Range("B4:B13").Interior.ColorIndex = 10
[10 este ColorIndex a culorii verde Vezi tabelul de culori.]
⧭ Ieșire:
Rulați acest cod și veți găsi culoarea de fundal a intervalului B4:B13 transformat verde .
2. Setați culoarea fontului din celulă utilizând ColorIndex în Excel VBA
De asemenea, puteți seta culoarea fontului textului din orice celulă folosind funcția ColorIndex proprietatea Excel VBA .
Să schimbăm culoarea fontului din intervalul B4:B13 la roșu.
⧭ Cod VBA:
Linia de cod va fi:
Range("B4:B13").Font.ColorIndex = 3 [3 este ColorIndex de Roșu .]
⧭ Ieșire:
Rulați acest cod și veți găsi culoarea fontului din intervalul B4:B13 transformat roșu .
3. Setați culoarea marginii celulei folosind ColorIndex în Excel VBA
Acum vom seta culoarea marginii celulei folosind funcția ColorIndex proprietate a VBA .
Să schimbăm culoarea marginii intervalului B4:B13 la roșu.
⧭ Cod VBA:
Linia de cod va fi:
Range("B4:B13").Borders.ColorIndex = 3 
⧭ Ieșire:
Rulați acest cod. Acesta va schimba culoarea marginilor intervalului B4:B13 la roșu.
4. Setați culoarea celulei la culoarea altei celule folosind ColorIndex
În cele din urmă, vă voi arăta că puteți schimba culoarea unei celule în funcție de culoarea altei celule.
Să schimbăm culoarea de fundal a celulei B5 la verde .
Acum, vom schimba culoarea de fundal a celulei D5 în funcție de cea a celulei B5 .
⧭ Cod VBA:
Linia de cod va fi:
Range("D5").Interior.ColorIndex = Range("B5").Interior.ColorIndex 
⧭ Ieșire:
Rulați acest cod, care va schimba culoarea de fundal a celulei D5 în funcție de cea a celulei B5 .
În mod similar, puteți schimba culoarea fontului sau culoarea marginii oricărei celule în funcție de cea a unei alte celule, utilizând funcția ColorIndex proprietate.
Mai multă învățare
În acest articol, am modificat culoarea celulelor folosind opțiunea ColorIndex proprietate a VBA .
În afară de ColorIndex există o altă proprietate numită Culoare în VBA , care se ocupă de culori.
Faceți clic aici pentru a o cunoaște în detaliu.
