Zvýraznění řádku v excelu

Klikni pravým tlačítkem myši na ouško listu a vyber volbu "zobrazit kód". Otevře se ti okno VBA a tam nakopíruj tenhle kód:

Public old_range As String
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If old_range = "" Then
Cells.Interior.ColorIndex = xlNone
old_range = Target.Row
End If
Rows(old_range).Interior.ColorIndex = xlNone
Rows(ActiveCell.Row).Interior.ColorIndex = 35
old_range = Target.Row
End Sub

nebo tohle:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ss = "X" 'pismeno sloupce
    Range(ss & ":" & ss).Interior.ColorIndex = 0 'bily sloupec
    Cells(ActiveCell.Row, Asc(ss) - 64).Interior.ColorIndex = 34 'svetle modra bunka
End Sub

Děkuji za rady,ale.V prvním případě se mi ztratilo barevné formátování a v druhém jde pouze jeden sloupec.Nešlo by těch sloupců víc? nebo celý řádek bez ztráty formátování? Děkuji

Bohužel, bez ztráty barevného formátování to neumím...
(výše uvedené rady nejsou z mojí hlavy, ale měl jsem podobný požadavek a toto je výsledek, co mi kdysi poradili...)

Tohle makro by mělo zachovat barevné formátování:
highlightrow.html

Zkus mrknout na tot:
172515
213193
nebo
http://www.experts-exchange.com/Software/Office_Pro ductivity/Office_Suites/MS_Office/Excel/Q_21442755. html