seychellesartprojects.org

Exceli VBA fondivärv

Atribuuti VBA Font Color kasutatakse Exceli lahtrite fondivärvi muutmiseks VBA-koodi abil. Saame fondi värvi mitmel viisil muuta, kasutades värviindeksit, RGB funktsiooniga värviomadust.

Excelis juhtpaneeli koostamisel kulutan tavaliselt märkimisväärselt palju aega lahtrite, fontide jne vormindamiseks. Sageli tunnen end Exceli kosmeetikuna, vaadates Exceli vormingu erinevaid värve. Exceli töölehe fondivärvi muutmine on lihtne töö, kuid Exceli osas peaksite teadma VBA-koodi kirjutamise viise fondi värvi muutmiseks.

Fondi värvi muutmiseks peame kõigepealt tuvastama, millised on lahtrid, mida me muudame.

Vahemik („A1: A10”)

Siis peame valima omaduse FONT.

Vahemik („A1: A10”). Font

Mida me siis selle fontiga teha tahame, siis valige Värv?

Vahemik („A1: A10”). Font. Värv

Nii peame fondi värvi muutmiseks koodi üles ehitama. See tundub keeruline?

Kuid pidage meeles, et alguses tundub kõik olevat karm, hiljem saate sellest aru.

Kuidas muuta fondi värvi VBA abil?

Selle VBA Font Color Exceli malli saate alla laadida siit - VBA Font Color Exceli mall

Näide 1 - Värviindeksi kasutamine

Värviindeksi omadus erineb VBA omadusest Värv. Numbriliste väärtuste abil saame muuta lahtrite, fontide värvi.

Numbrid on vahemikus 1 kuni 56 ja iga number tähistab erinevaid värve. Allpool on loetelu numbritest ja nende värvidest.

Ok, laseme selle proovida.

Mul on lahtris A1 väärtus.

Soovin muuta lahtri A1 fondi värvi roheliseks. Allpool on kood.

Kood:

 Alam FontColor_Example1 () Range ("A1"). Font.ColorIndex = 10 End Sub 

See muudab lahtri A1 fondi värvi roheliseks.

Fondi värvi muutmiseks võime kasutada ka vara CELLS.

Kood:

 Alam FontColor_Example1 () Lahtrid (1, 1). Font.ColorIndex = 10 Lõpp-alam 

Nii saame fondile soovitud värvi rakendamiseks kasutada numbreid 1–56.

Näide # 2 - Värviomaduse kasutamine

Värviindeksil on väga piiratud värvid vahemikus 1 kuni 56, kuid atribuudi COLOR abil saame kasutada 8 sisseehitatud värvi vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhite .

Nende värvide jaoks ei pea me numbreid sisestama, vaid pääseme neile lihtsalt juurde, kasutades nende nime, nagu eespool näidatud. Allpool on toodud kõigi 8 värvi näidiskood.

Kood:

 Sub vbBlack_Example () vahemik ("A1"). Font.Color = vbBlack End Sub 

Kood:

 Sub vbRed_Example () vahemik ("A1"). Font.Color = vbRed End Sub 

Kood:

 Sub vbGreen_Example () vahemik ("A1"). Font.Color = vbGreen End Sub 

Kood:

 Sub vbBlue_Example () vahemik ("A1"). Font.Color = vbBlue End Sub 

Kood:

 Sub vbYellow_Example () vahemik ("A1"). Font.Color = vbYellow End Sub 

Kood:

 Sub vbMagenta_Example () vahemik ("A1"). Font.Color = vbMagenta End Sub 

Kood:

 Sub vbCyan_Example () vahemik ("A1"). Font.Color = vbCyan End Sub 

Kood:

 Sub vbWhite_Example () vahemik ("A1"). Font.Color = vbWhite End Sub 

Näide # 3 - Värviomaduse kasutamine RGB-funktsiooniga

Nagu nägime, on meil töötamiseks ainult 8 sisseehitatud värvi. Kuid selleks, et meil oleks palju erinevaid värve, peame kasutama funktsiooni nimega RGB, peale sisseehitatud värvide saame vba RGB funktsiooni abil luua oma värvid.

Vaadake RGB-funktsiooni süntaksit.

RGB (punane, roheline, sinine)

RGB tähistab punast, rohelist ja sinist. Värvide koostamiseks peame iga värvi jaoks esitama numbrid vahemikus 0 kuni 255.

Allpool on mõned näited teie jaoks.

Allpool on toodud mõned makrokoodi näited

Kood:

 Sub RGB_Example () Range ("A1"). Font.Color = RGB (0, 0, 0) 'Muutke fondi värv mustaks End Sub 

Kood:

 Alam RGB_näide () vahemik ("A1"). Font.Color = RGB (16, 185, 199) 'Fondi värv on see lõpu alam 

Kood:

 Alam RGB_näide () vahemik ("A1"). Font.Color = RGB (106, 15, 19) 'Fondi värv on see lõpu alam 

Kood:

 Alam RGB_näide () vahemik ("A1"). Font.Color = RGB (216, 55, 19) 'Fondi värv on see lõpuosa