Удалить строки в одной из ячеек которых нет значения

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Удалить строки в одной из ячеек которых нет значения - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Удалить строки в одной из ячеек которых нет значения (Формулы/Formulas)

Удалить строки в одной из ячеек которых нет значения

kioki

Дата: Воскресенье, 24.05.2015, 00:57 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 47

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Удалить строки в одной из ячеек которых нет одного из перечисленных значений

К сообщению приложен файл: 7956419.xlsx (11.5 Kb)

Ответить

ShAM

Дата: Воскресенье, 24.05.2015, 07:56 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1347

Репутация: 249 ±

Замечаний: 0% ±

Excel 2010

Так?
[vba]

Код

Sub dlt()
     For i = Cells(Rows.Count, 2).End(xlUp).Row To 2 Step -1
         If Cells(i, 2) <> "C" And Cells(i, 2) <> "D" And Cells(i, 2) <> "E" Then Rows(i).Delete
     Next i
End Sub

[/vba]

К сообщению приложен файл: kioki.xlsm (17.3 Kb)

Ответить

kioki

Дата: Среда, 29.07.2015, 11:07 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 47

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

ShAM, Спасибо!

Ответить

Удалить строки в одной из ячеек которых нет значения (Формулы/Formulas)

Страница 1 из 1
1