Как скрыть строки в EXCEL

Программирование на Visual Basic for Applications
ИгорьДЛ
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 13.09.2006 (Ср) 8:41

Как скрыть строки в EXCEL

Сообщение ИгорьДЛ » 13.09.2006 (Ср) 8:53

Как возможно скрыть строки, при условии, что значения в 2 колонках равны нулю?
Например в простом отчете о движении ДС в строках указаны статьи, в колонке "С" - приход, в колонке "D" - расход. Нужно, соответственно, скрыть строку, если никакого движения не было, те С=0,00 и D=0,00.
Спасибо.

fishh
Обычный пользователь
Обычный пользователь
 
Сообщения: 81
Зарегистрирован: 21.10.2005 (Пт) 9:50

Сообщение fishh » 13.09.2006 (Ср) 9:08

Код: Выделить всё
Sub RowHid()
i = 1
Do While Not Cells(i, 1) = ""
    If Cells(i, 3) = 0 And Cells(i, 4) = 0 Then
        Rows(i).EntireRow.Hidden = True
    End If
i = i + 1
Loop
End Sub

ИгорьДЛ
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 13.09.2006 (Ср) 8:41

Сообщение ИгорьДЛ » 13.09.2006 (Ср) 15:43

Спасибо, все получилось

KL
Microsoft MVP
 
Сообщения: 483
Зарегистрирован: 30.10.2005 (Вс) 0:31
Откуда: Madrid

Сообщение KL » 13.09.2006 (Ср) 22:53

Еще можно так (см. приложение) и врядли что-либо сравнится по скорости: что 53 строки что 30,000 строк занимают менее секунды ;-)
Вложения
Book1.xls
(42 Кб) Скачиваний: 225
Привет,
KL


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 92

    TopList