VBA färgindexkodlista
När du använder VBA för att koda Colorindex (eller bakgrundsfärg) i en cell är det användbart att veta vilket heltal som motsvarar vilken färg. Nedan finns en referensbild som visar färgen och listar dess respektive Colorindex. aka VBA färgpalett
Här är koden för att göra en åt dig själv, eller bara bokmärka den här sidan:
| 123456789101112131415 | Sub ColorRef ()Dim x Som heltalFör x = 1 till 56Om x <DåCeller (x, 1) .Interior.ColorIndex = xCeller (x, 2) = xAnnanCeller (x - 28, 3) .Interior.ColorIndex = xCeller (x - 28, 4) = xAvsluta omNästa xAvsluta Sub |
VBA ColorIndex Exempel
Ställ in bakgrundsfärg för cell
| 1 | Område ("A1"). Interiör.ColorIndex = 6 |
Ange cellfärgfärg
| 1 | Område ("A1"). Font.ColorIndex = 5 |
Ställ in färg på cellgränser
| 1 | Område ("A1"). Borders.ColorIndex = 5 |
Skaffa cellbakgrund ColorIndex
| 123 | Dim kol som heltalcol = Range ("A1"). Interiör.ColorIndex |
Ställ in en bakgrundsfärg till en annan cell
| 1 | Intervall ("A1"). Interior.ColorIndex = Range ("B1"). Interior.ColorIndex |
VBA Color Property
Istället för att använda Excel / VBA: s ColorIndex -egenskap kan du använda egenskapen Color. Egenskapen Färg har två inmatningstyper:
- vbColor
- RGB -färger
Vi kommer att diskutera dessa nedan:
VB -färg
VB Color är det enklaste sättet att ställa in färger i VBA. Det är dock också det minst flexibla. För att ställa in en färgkod med vbColor använder du tabellen nedan:
Men som du kan se från tabellen är dina alternativ extremt begränsade.
Ställ in bakgrundsfärg för cell
| 1 | Räckvidd ("A1"). Interiör.Färg = vbGul |
Ange cellfärgfärg
| 1 | Område ("A1"). Font.Color = vbBlue |
Ställ in färg på cellgränser
| 1 | Område ("A1"). Borders.Color = vbRed |
Ställ in en bakgrundsfärg till en annan cell
| 1 | Intervall ("A1"). Interiör.Färg = Område ("B1"). Interiör.Färg |
RGB -färger
RGB står för Red Green Blue. Det här är de tre huvudfärgerna som kan kombineras för att producera någon annan färg. När du anger färger som RGB anger du ett värde mellan 0 och 255 för varje färgkod.
Här är ett exempel:
| 1 | Område ("A1"). Interiör.Färg = RGB (255 255,0) |
Ovan har vi ställt in rött = 255 (maxvärde), grönt = 255 (maxvärde) och blått = 0 (minvärde). Detta sätter cellens bakgrundsfärg till gul.
Istället kan vi ange cellfärgsfärgen till lila:
| 1 | Område ("A1"). Interiör.Färg = RGB (128,0128) |
Det finns många onlineverktyg för att hitta RGB -koden för önskad färg (här är en).
ColorIndex -kodlista och RGB -färger i Access VBA
Access använder formulär för att visa data. Du kan använda ColorIndex -koderna för att programmatiskt ändra bakgrundsfärgen och förgrundsfärgen för objekt i dina Access -formulär.
| 12345 | Privat under cmdSave_Click ()'ändra bakgrundsfärgen på knappen Spara när posten sparas.DoCmd.RunCommand acCmdSaveRecordcmdSave.BackColor = vbGreenAvsluta Sub |
