Макрос - удалить ячейки с пустыми ("") значениями

abutov Пользователь Сообщений: 46 Регистрация: 09.05.2020	#1 21.11.2023 19:54:11 Помогите пожалуйста с макросом Нужно удалить строку если в столбце А пустое значение (= "") Прикрепленные файлы Книга1.xlsm (14.22 КБ) Изменено: abutov - 21.11.2023 21:34:13

Пользователь

Сообщений: 46 Регистрация: 09.05.2020

21.11.2023 21:33:23

Вроде сам справился

Код
Dim k As Long For k = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1 If Cells(k, 1).Value = "" Then Rows(k).Delete Shift:=xlUp End If Next k

Пользователь

Сообщений: 551 Регистрация: 21.10.2019

21.11.2023 22:03:55

abutov, Добрый вечер.

Код
Range("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete