Страница: 1 |
Страница: 1 |
Вопрос: плиз, хелп - различает ли цвета??
Добавлено: 02.12.05 12:31
Автор вопроса: formentor
у меня документ в Excel разноцветный, и мне надо убить все белые, то есть не выделенные никаким цветом, rows
вот такую весчь он не понимает, говорит, не поддерживает
If Cells(i, 1).Interior.ColorIndex = 1 Then
Rows(i).Delete Shift:=xlUp
можно это как-то сделать?
заранее спасибо
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Дмит
Вопросов: 11
Ответов: 160
Web-сайт:
Профиль | | #1
Добавлено: 02.12.05 23:04
Я бы сделал так:
For i = 20 To 1 Step -1
If Cells(i, 1).Interior.ColorIndex = 2 Or Cells(i, 1).Interior.ColorIndex = xlNone Then
Rows(i).Delete
End If
Next