Как не с помощью макроса выполнить фильтр поцвету и очистить.
Макрос:
Range("I26:I32").Select
Selection.AutoFilter
ActiveSheet.Range("$I$26:$I$32").AutoFilter Field:=1, Criteria1:=RGB(221, _
217, 195), Operator:=xlFilterCellColor
(6) Друг, спасибо! Надо учиться мыслить как программист, а не тупо заучивать...
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс