Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 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-сайт: dimit.pochta.ru
 Профиль | | #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

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам