---

Cells(1, 1).BackColor = vbRed

Virker ikke

Hvad kan man så skrive for at få skifted farven ?

---

Hei Jens

I motsetning til all moderne software har Excel kun 56 farver. Rød er nr 3:

Sub Roed()
Cells(1, 1).Interior.ColorIndex = 3
End Sub

Og hvordan skulle du kunne vite det ? I "gamle excel" sto farverne i
index-rekkefølge, så man kunne i alle fall telle seg frem. Denne kan måske
hjelpe:

Sub Farvekart()
Dim i As Integer
For i = 1 To 56
Cells(i, 1).Interior.ColorIndex = i
Cells(i, 2).Value = "Colorindex " & i
Next
End Sub

HTH. Beste hilsen Harald


"Jens Andersen" <til@infojens.dk> wrote in message
news:3b6be36b$0$44137$edfadb0f@dspool01.news.tele.dk...
>
> Cells(1, 1).BackColor = vbRed
>
> Virker ikke
>
> Hvad kan man så skrive for at få skifted farven ?
>
>

---

Tusinde tak Harald

Det virker perfekt !