Ozadje aktivne vrstice

Pomoč pri delu z MS Excelom
Odgovori
branezsti
Prispevkov: 3
Pridružen: To Avg 22, 2006 2:04 pm
Kraj: Kamnik

Ozadje aktivne vrstice

Odgovor Napisal/-a branezsti »

Kako v Excelu definirati, da se ozadje aktivne vrstice obarva z neko barvo, ki jo definiramo sami!
cedra
Prispevkov: 264
Pridružen: Po Jul 25, 2005 11:11 pm
Kraj: Kamnik

Odgovor Napisal/-a cedra »

Morda bo zadostovalo tole:

Koda: Izberi vse


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        
        Rows.Interior.ColorIndex = 0 ' Izbris barve prejšnje označene vrstice
        Selection.EntireRow.Interior.ColorIndex = 4 'Izberi med 0 in 56

End Sub

lp,


cedra
branezsti
Prispevkov: 3
Pridružen: To Avg 22, 2006 2:04 pm
Kraj: Kamnik

Odgovor Napisal/-a branezsti »

Sem začetnik z makroji, nekako sem se znašel, tako da deluje naslednja koda:

Sub AR()
Rows.Interior.ColorIndex = 0
ActiveCell.Rows("1:1").EntireRow.Select
With Selection.Interior
.ColorIndex = 44
.Pattern = xlSolid
End With
End Sub

Zdaj pa bi rad vedel, kako definirati, da se bo makro sprožil samodejno vsakič, ko zamenjamo aktivno vrstico!
branezsti
Prispevkov: 3
Pridružen: To Avg 22, 2006 2:04 pm
Kraj: Kamnik

Odgovor Napisal/-a branezsti »

Tudi vaša koda deluje, samo meni je manjkalo malo znanja okrog Makrojev.
LP
Odgovori