Satura rādītājs
Mainīt šūnas krāsu - .Interior.ColorIndex
Lai mainītu šūnas krāsu, mēs varam izmantot:
Šūna.Interior.ColorIndex = Num
Kur:
• Šūna ir šūnas atsauce
• Interjers - attiecas uz faktiskās šūnu krāsas krāsu (interjera īpašums)
• Colourindex ir vērtība no 1 līdz 56 vienai no Excel 56 iepriekš definētajām krāsām
Un Num ir šūnai piešķirtā numura krāsa. Tomēr ne vienmēr ir viegli atcerēties, kurš skaitlis apzīmē kādu krāsu. Šī apakšprogramma maina šūnu krāsu, pamatojoties uz rindas numuru. Piemēram, 3. rindā būs 3. krāsa utt.
Tā kā programmā Excel ir 56 iepriekš iestatītas krāsas, tas nozīmē, ka šūnām 59., 115 būs tāda pati krāsa kā 3. rindas šūnai:
| 123456789101112 | Skaidrs variantsPrivāta apakškomandaButton1_Click ()Colour_Range (loksnes ("Sheet2"). Diapazons ("A1: A2000"))Beigu apakšApakškrāsu diapazons (šūnu diapazons kā diapazons)'Krāsos katru diapazonā esošo šūnuDim šūnaKatrai šūnai Cell_RangeŠūna.Interior.ColorIndex = Šūna.Rindas 56. modŠūna. Nobīde (0, 0). Vērtība = Šūna. RindaNākamaisBeigu apakš |
Rutīnu aktivizē klikšķa notikums.
Lai lejupielādētu .XLSM failu šai apmācībai, lūdzu, noklikšķiniet šeit.
