Innholdsfortegnelse
Endre farge på celle - .Interior.ColorIndex
For å endre fargen på en celle kan vi bruke:
Cell.Interior.ColorIndex = Num
Hvor:
• Celle er cellereferansen
• Interiør - refererer til fargen på den faktiske cellefargen (interiøret)
• Colourindex er en verdi mellom 1 og 56 for en av Excel 56 forhåndsdefinerte farger
Og Num er tallfargen som er tilordnet cellen. Imidlertid er det ikke alltid lett å huske hvilket tall som representerer hvilken farge. Følgende underprogram endrer cellefargen basert på radnummeret. Så for eksempel vil rad 3 ha farge 3 osv.
Siden det er 56 forhåndsinnstilte farger i Excel, betyr dette at cellene 59, 115 vil ha samme farge som cellen i rad 3:
123456789101112 | Alternativ EksplisittPrivate Sub CommandButton1_Click ()Colour_Range (Sheets ("Sheet2"). Range ("A1: A2000"))Slutt SubUnderfargeområde (celleområde som område)'Farger hver celle i områdetDim CellFor hver celle i celleområdeCell.Interior.ColorIndex = Cell.Row Mod 56Cell.Offset (0, 0) .Value = Cell.RowNesteSlutt Sub |
Rutinen aktiveres av en klikkhendelse.
Klikk her for å laste ned .XLSM -filen for denne opplæringen.