MS Excel

Téma: zabarvení buňky na základě hodnoty druhé buňky

Zaslal/a Leopold 28.2.2013 20:52

Zdravím,
potřeboval bych pomoci s touto situací:
v buňce A1/list1 mám rozbal. seznam s cca 30 pozicemi. V A1:A30/list2 je zdroj pro seznam (bílá,cervená ...atd. V B1:B30/list2 je barevná škála. a nyní potřebuji tohle: Když na listu 1 v seznamu vyberu text bílá aby se v buňce vedle cili B2/list1 zobrazila příslušná barva tedy bílá.

díky za pomoc

bleopold@seznam.cz - 725 451 336

Zaslat odpověď >

Pavlus(28.2.2013 22:02)#011948

Šlo by to třeba přes podmíněné formátování. Barevná škála na jiném listu ale bude v tomto případě k ničemu.
Pomocí vzorců, pokud vím, nejde odkazovat na barvu, takže by se pak jedině muselo využít nějaké makro ve VBA.
P.

Př.:
Podmíněné formátování/ Nové pravidlo/ Vzorec
Zadej toto a vyber výplň... (pro každou barvu)
=$A$1="černá"Nebo využij VBA kód:Private Sub Worksheet_Change(ByVal Target As Range)
Dim radek As Long
Dim cislo_barvy As Long

On Error Resume Next
radek = WorksheetFunction.Match(Range("A1"), Sheets("List2").Range("A1:A30"), 0)
cislo_barvy = Sheets("List2").Range("B" & radek).Interior.Color

Range("B1").Interior.Color = cislo_barvy
End Subcitovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.