VBA krāsu indeksa kodu saraksts
Izmantojot VBA, lai kodētu šūnas Colorindex (vai fona krāsu), ir lietderīgi zināt, kurš vesels skaitlis būs vienāds ar krāsu. Zemāk ir atsauces attēls, kurā parādīta krāsa un norādīts tās atbilstošais Colorindex. aka VBA krāsu palete
Šeit ir kods, lai to izveidotu pats, vai vienkārši pievienojiet grāmatzīmi šai lapai:
| 123456789101112131415 | ApakškrāsaRef ()Dim x kā vesels skaitlisX = 1 līdz 56Ja x <tadŠūnas (x, 1). Interjers.ColorIndex = xŠūnas (x, 2) = xCitādiŠūnas (x - 28, 3). Interjers. Krāsu indekss = xŠūnas (x - 28, 4) = xBeigas JaNākamais xBeigu apakš |
VBA ColorIndex piemēri
Iestatiet šūnas fona krāsu
| 1 | Diapazons ("A1"). Interjers.ColorIndex = 6 |
Iestatiet šūnas fonta krāsu
| 1 | Diapazons ("A1"). Fonts.ColorIndex = 5 |
Iestatiet šūnu apmaļu krāsu
| 1 | Diapazons ("A1"). Robežas.ColorIndex = 5 |
Iegūstiet šūnu fona krāsuIndex
| 123 | Dim col kā vesels skaitliscol = Diapazons ("A1"). Interjers.ColorIndex |
Iestatiet šūnas fona krāsu uz citas šūnas krāsu
| 1 | Diapazons ("A1"). Interior.ColorIndex = Diapazons ("B1"). Interior.ColorIndex |
VBA krāsu īpašums
Tā vietā, lai izmantotu Excel / VBA īpašumu ColorIndex, varat izmantot rekvizītu Krāsa. Rekvizītam Krāsa ir divi ievades veidi:
- vbKrāsa
- RGB krāsas
Mēs tos apspriedīsim tālāk:
VB krāsa
VB Color ir vienkāršākais veids, kā iestatīt krāsas VBA. Tomēr tas ir arī vismazāk elastīgs. Lai iestatītu krāsu kodu, izmantojot vbColor, izmantojiet šo tabulu:
Tomēr, kā redzams no tabulas, jūsu iespējas ir ārkārtīgi ierobežotas.
Iestatiet šūnas fona krāsu
| 1 | Diapazons ("A1"). Interjers.Krāsa = vbDzeltens |
Iestatiet šūnas fonta krāsu
| 1 | Diapazons ("A1"). Fonts.Krāsa = vbZila |
Iestatiet šūnu apmaļu krāsu
| 1 | Diapazons ("A1"). Robežas.Krāsa = vbSarkana |
Iestatiet šūnas fona krāsu uz citas šūnas krāsu
| 1 | Diapazons ("A1"). Interjers. Krāsa = Diapazons ("B1"). Interjers. Krāsa |
RGB krāsas
RGB apzīmē sarkani zaļu zilu. Šīs ir trīs galvenās krāsas, kuras var kombinēt, lai iegūtu jebkuru citu krāsu. Ievadot krāsas kā RGB, katram krāsu kodam ievadiet vērtību no 0 līdz 255.
Šeit ir piemērs:
| 1 | Diapazons ("A1"). Interjers. Krāsa = RGB (255 255,0) |
Iepriekš mēs esam iestatījuši sarkanu = 255 (maksimālā vērtība), zaļo = 255 (maksimālā vērtība) un zilo = 0 (minimālā vērtība). Tādējādi šūnas fona krāsa tiek iestatīta uz dzeltenu.
Tā vietā mēs varam iestatīt šūnu fonta krāsu uz violetu:
| 1 | Diapazons ("A1"). Interjers. Krāsa = RGB (128,0 128) |
Ir daudz tiešsaistes rīku, lai atrastu vēlamās krāsas RGB kodu (šeit ir viens).
ColorIndex kodu saraksts un RGB krāsas Access VBA
Access datu parādīšanai izmanto veidlapas. Varat izmantot ColorIndex kodus, lai programmiski mainītu piekļuves veidlapu objektu fona krāsu un priekšplāna krāsu.
| 12345 | Privāts apakš cmdSave_Click ()'mainīt ieraksta saglabāšanas fona krāsu, kad ieraksts ir saglabāts.DoCmd.RunCommand acCmdSaveRecordcmdSave.BackColor = vbGreenBeigu apakš |
