Värikoodit

mites se laitetaan kaavaan JOS alue on punainen, niin sen arvo on jotain. Kaava siis muuten hallinnassa mutta pelkkä "3" ei riitä...

Ekenäs kirjoitti:

mites se laitetaan kaavaan JOS alue on punainen, niin sen arvo on jotain. Kaava siis muuten hallinnassa mutta pelkkä "3" ei riitä...

Eipä taida tuon värikoodin käyttäminen JOS-funktiossa onnistua, mutta makrossa onnistuu.

Sub Makro2()

If [G10].Interior.ColorIndex = 3 Then
[C7] = 22
End If
End Sub

paavali kirjoitti:

Eipä taida tuon värikoodin käyttäminen JOS-funktiossa onnistua, mutta makrossa onnistuu.

Sub Makro2()

If [G10].Interior.ColorIndex = 3 Then
[C7] = 22
End If
End Sub

On vähän tuo makroilu uutta, pitäisi siis saada seuraavanlainen kuvio: esim. kentissä B5;K5 oleva punainen tai joku muu väri pitäisi saada muuttumaan arvoksi 0,25 kenttien summa pitäisi myös saada laskettua. Eri värin tuottama luku eri paikkoihin summana...
Mistä noi värikoodit voi poimia?

Ekenäs kirjoitti:

On vähän tuo makroilu uutta, pitäisi siis saada seuraavanlainen kuvio: esim. kentissä B5;K5 oleva punainen tai joku muu väri pitäisi saada muuttumaan arvoksi 0,25 kenttien summa pitäisi myös saada laskettua. Eri värin tuottama luku eri paikkoihin summana...
Mistä noi värikoodit voi poimia?

Avaa uusi exceltaulukko.
paina Alt ja ylärivin F11
sieltä Insert -> Module
ja kopioit tämän Kunden tekemä koodin sinne

Sub NäytäVärit()
Application.ScreenUpdating = False
Dim i As Long
Dim str0 As String, str As String
For i = 0 To 56
Cells(i 1, 1).Interior.ColorIndex = i
Cells(i 1, 2).Value = "Väri " & i
Next
Application.ScreenUpdating = True
End Sub

Kun suoritat tämän makron saat värikoodit.
Makroista saat lisätietoja excel ohjeesta.