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āsas 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?
# 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. Tāpēc, lai mainītu šūnas fona krāsu, izmantojiet rekvizītu “Interjers”.
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āsas () 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, vbWhiteIzvēlieties krāsu veidu atbilstoši savai vēlmei.
Kods:
Apakškrāsas () diapazons ("A1"). Interior.Color = vbBlue End Sub
Ja es palaidīšu šo kodu, izmantojot F5 taustiņu vai manuāli, tas mainīs šūnas A1 fona krāsu uz vērtību .
Šā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 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 šūnas A1 fonta krāsu mainītu 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 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 kopijas. Zemāk ir krāsu kodu dublikātu saraksts.
