Добрый день!
Я использую такой макрос в прайсе, чтоб убрать незаполненные строки
| Код |
|---|
Sub отфильтровать()
Dim cell As Range: Application.ScreenUpdating = False
For Each cell In [D8:D1089].Cells
If cell.Find("*", , xlValues, xlPart) Is Nothing Then
cell.EntireRow.Hidden = True
End If
Next cell
End Sub |
Но после того как отфильтрую, больше изменения внести не могу, если забыла что-то...
Как можно опять отобразить скрытые строки ??? Все перерыла не могу найти((( Помогите пожалуйста
