Добрый день!
Подскажите пожалуйста, что не так.
Есть таблица: наименование, код, остаток, заказ.
Как сделать так, чтобы после ввода количества в столбец заказ при запуске цикла удалялись строки с пустыми значениями в столбце заказ.
Вот код макроса, но он не работает.
Спасибо.
Подскажите пожалуйста, что не так.
Есть таблица: наименование, код, остаток, заказ.
Как сделать так, чтобы после ввода количества в столбец заказ при запуске цикла удалялись строки с пустыми значениями в столбце заказ.
Вот код макроса, но он не работает.
Код |
---|
Sub Zakaz() Dim Zak As Worksheet For Each Zak In ThisWorkbook.Worksheets Zak.Select ActiveWindow.FreezePanes = False Zak.Rows.AutoFilter Zak.Rows.AutoFilter Field:=5, Criteria1:="=" Cells.Select Selection.Delete Shift:=xlUp Range("A1" ;) .Select While Zak.Cells(1, 5 + 1).Value <> "" Zak.Columns(5 + 1).Delete Shift:=xlToLeft Wend Next End Sub |
Спасибо.