seychellesartprojects.org

Excel VBA krāsu indekss

Tāpat kā darblapā, VBA mājas cilnē mainām šūnas vai noteiktā šūnu diapazona krāsu. Mums ir vba funkcija, ko sauc par krāsu indeksu, ko izmanto, lai mainītu šūnu vai paredzēto šūnu diapazonu krāsas, šīm funkcijām ir unikāla identifikācija dažāda veida krāsām.

VBA mums ir divi krāsu pielietošanas veidi, no kuriem pirmais ir rekvizīts “color”, bet otrais - rekvizīts “ColorIndex”.

Šūnai mēs piešķiram krāsu kā fona krāsu, mēs izmantojam fonta krāsu un apmales krāsu. Tātad, lai piekļūtu krāsu un krāsu indeksa īpašumam, mums vispirms jāizvēlas šūna.

Kā izmantot krāsu un krāsu indeksa īpašību?

Šo VBA krāsu indeksa veidni varat lejupielādēt šeit - VBA krāsu indeksa veidne

# 1 - Krāsu rekvizītu izmantošana

Pieņemsim, ka šūnā A1 ir vārds “Labdien”. Mēs redzēsim, kā piemērot šīs šūnas fona krāsu.

Lai mainītu fona krāsu, krāsu īpašībās vispirms ir jāpiemin šūnas diapazons.

Kods:

 Apakškrāsas () diapazons ("A1") Beigu apakšgrupa 

Pēc šūnas izvēles mums jāpiemin, kas mums ir jādara. Kā jau teicu, mums jāmaina šūnas iekšējā krāsa. Lai mainītu šūnas fona krāsu, izmantojiet rekvizītu “Interior”.

Kods:

 Apakškrāsu () diapazons ("A1"). Interjera beigu apakšgrupa 

Sadaļā Interjera īpašums mums ir vairākas citas metodes un īpašības. Tā kā mums jāmaina šūnas krāsa, izmantojiet krāsu īpašību.

Kods:

 Apakškrāsa () diapazons ("A1"). Interjers. Krāsa = Beigu apakšgrupa 

Šeit mēs varam izmantot 8 nepārtraukti nosauktas krāsas. Zemāk ir to pašu saraksts.

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

Izvēlieties krāsu veidu atbilstoši savai vēlmei.

Kods:

 Apakškrāsas () diapazons ("A1"). Interior.Color = vbBlue End Sub 

Ja es palaidu šo kodu, izmantojot F5 taustiņu vai manuāli, tas mainīs šūnas A1 fona krāsu uz vbBlue.

Šādi jūs varat izmantot citas nemainīgas krāsas. Mēģiniet tos izmantot, lai pārbaudītu rezultātu.

Bez šīm 8 nemainīgajām krāsām mēs varam arī aizpildīt dažādas krāsas, kā arī izmantojot RGB funkciju VBA.

Kods:

 Apakškrāsas () diapazons ("A1"). Interjers. Krāsa = RGB (beigu apakš 

Mums skaitļos jāievada sarkanās, zaļās un zilās krāsas maisījums. Lai to izmantotu, jums vajadzētu būt ideālam, ievadot skaitļus. Esmu ievadījis maisījumu kā RGB (250, 200, 150).

Kods:

 Apakškrāsas () diapazons ("A1"). Interjers. Krāsa = RGB (250, 200, 150) Beigas Apakš 

Šīs krāsas maiņa ir šāda.

Šeit problēma ir tā, ka jūs precīzi nezināt, kuram skaitlim ir kāda krāsa.

Zemāk esošajam kodam ir jāmaina fonta krāsa.

Kods:

 Apakškrāsu_fonts () diapazons ("A1"). Fonts. Krāsa = RGB (100, 400, 100) Beigas apakšdaļa 

Palaidiet šo kodu, izmantojot F5 taustiņu, vai manuāli, lai iegūtu rezultātu.

# 2 - Krāsu indeksa rekvizīta izmantošana

Krāsu indekss nedaudz atšķiras no krāsas rekvizīta. Īpašumā COLOR mēs izmantojam 8 nemainīgas krāsas, ko piešķīrusi VBA, kā arī izmantojot RGB funkciju, mēs izveidojam paši savu krāsu.

Īpašība COLOR INDEX ir ierobežota VBA, tajā var būt vērtības no 1 līdz 56. Katram skaitlim no 1 līdz 56 ir dažādas krāsas. Zemāk ir saraksta numuri un to attiecīgās krāsas.

Zemāk ir makro kods, lai šūnas A1 fona krāsu mainītu uz sārtu.

Kods:

 Sub ColorIndex_Cell () diapazons ("A1"). Interior.ColorIndex = 26 Beigas Sub 

Lai redzētu rezultātu, palaidiet šo kodu manuāli vai izmantojot taustiņu F5.

Zemāk ir makro kods, lai mainītu šūnas A1 fonta krāsu uz dzeltenu.

Kods:

 Sub ColorIndex_Font () diapazons ("A1"). Font.ColorIndex = 27 Beigas Sub 

Palaidiet šo kodu, izmantojot taustiņu F5, vai arī varat palaist manuāli un redzēt rezultātu.

Viena no svarīgākajām lietām, kas šeit jāatceras, ir tā, ka mēs varam ievadīt skaitļus no 1 līdz 56. Ja kaut kas pārsniedz 56, mēs saņemsim kļūdu “Subscript Out Out Range”.

Vai jūs novērojāt?

Kā es teicu Color Index, īpašums var ievietot tikai 56 krāsas, bet fakts ir tāds, ka tas var ievietot tikai 46 unikālas krāsas un ir 10 krāsu dublikāti. Zemāk ir krāsu kodu dublikātu saraksts.