Autofilter?

set rng = Activesheet.AutoFilter.Range
set rng = rng.offset(1,0).Resize(rng.rows.count-1)
set rng1 = rng.Columns(1).SpecialCells(xlVisible)
if rng.count = 1 then
rng.Resize(1,rng.columns.count).Select
' or
' rng.Resize(1,rng.columns.count).Interior.ColorInde x = 5
End if

Not sure what you mean by highight. First option selects the row, second
colors it.

--
Regards,
Tom Ogilvy

"fgatch" wrote in message
...

hi,

not sure if this is possible, but i have a large range of unique data
which i filter through. when i perform a search for a single row and
all other rows are hidden, i'd like to highlight the single filtered
row in yellow. is this possible with a macro? any ideas?

thanks,

Frank


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/