algoritam za dodeljivanje vrednosti na osnovu boje celije

Odgovori Nova tema

3 odgovora
3.545 pregleda

algoritam za dodeljivanje vrednosti na osnovu boje celije 04.04.2013. u 01:29 · pre 165 meseci #1

Imam pitanje pa me zanima kao i naslovu da li je moguce postaviti algoritam za dodeljivanje vrednosti na osnovu boje celije.

da pojednostavim

Imam kolunu A ( boje ) i kolonu B ( potrebno je da dobijem vrednost na osovu te boje )

Npr

ako je A - green onda je B =2

ako je A - red onda je B = 3

Re: algoritam za dodeljivanje vrednosti na osnovu boje celije 04.04.2013. u 11:03 · pre 165 meseci #2

mozda ovo pomogne

Potpis

[email protected]=

IndeksBoja.xlsm16.32k

Re: algoritam za dodeljivanje vrednosti na osnovu boje celije 04.04.2013. u 11:20 · pre 165 meseci #3

Moguće je samo pomoću VBA.
Ovakvom funkcijom možeš da saznaš koji broj predstavlja neku boju:

Code:
Function fncKojaJeBoja(rngCell As Range)
Dim lngBoja As Long
fncKojaJeBoja = rngCell.Interior.Color
End Function

Koristeći te brojeve možeš da definišeš funkciju koja će ti za datu boju ćelije vraćati neku željenu vrednost:

Code:
Function fncBojaUVrednost(rngCell As Range)
Dim lngBoja As Long
    lngBoja = rngCell.Interior.Color
    Select Case lngBoja
        Case 65535
            fncBojaUVrednost = "žuta"
        Case 5296274
            fncBojaUVrednost = "zelena"
        Case 14281213
            fncBojaUVrednost = "roze"
        Case 14994616
            fncBojaUVrednost = "plava"
    End Select
End Function

4-4-2013 11-19-19.png3.78k Boja u vrednost.xlsm15k

Re: algoritam za dodeljivanje vrednosti na osnovu boje celije 04.04.2013. u 12:18 · pre 165 meseci #4

Imali smo ovo pre 5 godina u Sabiranje vrednosti obojenih ćelija

Danas bih koristio Application.Volatile umesto opcionog argumenta - za istu svrhu tj osvežavanje vrednosti nakon izmene.

Code:

Function CellCol(Target As Range) As Long

Application.Volatile
CellCol = Target.Interior.ColorIndex
End Function

Potpis

Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation?
↗Ana & Vlade Divac Foundation
Hvala!

CellColor_v2.xls42k

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme