Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Удалить строки в которых одни ноли. - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Удалить строки в которых одни ноли. (Формулы/Formulas)
Удалить строки в которых одни ноли.
Mark1976 Дата: Четверг, 28.07.2016, 20:40 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 328
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Всем привет. Есть таблица, которая имеет несколько тысяч строк, и имеет 4 столбца. Как мне удалить те строки, в которых стоят одни ноли?. Но не трогая те строки в которых имеются цифры отличные от ноля. Фильтром это не получится сделать. Помогите.
К сообщению приложен файл: 280716-1-.xlsx(8Kb)
 
Ответить
СообщениеВсем привет. Есть таблица, которая имеет несколько тысяч строк, и имеет 4 столбца. Как мне удалить те строки, в которых стоят одни ноли?. Но не трогая те строки в которых имеются цифры отличные от ноля. Фильтром это не получится сделать. Помогите.

Автор - Mark1976
Дата добавления - 28.07.2016 в 20:40
Nic70y Дата: Четверг, 28.07.2016, 20:52 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3471
Репутация: 722 ±
Замечаний: 0% ±

Excel 2013
Фильтром это не получится
почему?
ставьте фильтр на все нужные столбцы и фильтруйте каждый - останутся только нужные строки, их и удалить.


ЯД(poison) 41001841029809
+7 978 049 98 74 (мтс)
 
Ответить
Сообщение
Фильтром это не получится
почему?
ставьте фильтр на все нужные столбцы и фильтруйте каждый - останутся только нужные строки, их и удалить.

Автор - Nic70y
Дата добавления - 28.07.2016 в 20:52
Pelena Дата: Четверг, 28.07.2016, 21:07 | Сообщение № 3
Группа: Модераторы
Ранг: Экселист
Сообщений: 9839
Репутация: 2252 ±
Замечаний: 0% ±

Excel 2010 & Mac Excel 2011
Здравствуйте.
В доп. столбец формулу массива
Код
=И(B2:E2=0)

фильтр по значению ИСТИНА -- удалить строки
или
Код
=СУММ(B2:E2)

и фильтр по значению 0
К сообщению приложен файл: 0874784.xlsx(10Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеЗдравствуйте.
В доп. столбец формулу массива
Код
=И(B2:E2=0)

фильтр по значению ИСТИНА -- удалить строки
или
Код
=СУММ(B2:E2)

и фильтр по значению 0

Автор - Pelena
Дата добавления - 28.07.2016 в 21:07
_Boroda_ Дата: Четверг, 28.07.2016, 21:11 | Сообщение № 4
Группа: Модераторы
Ранг: Экселист
Сообщений: 9346
Репутация: 3922 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Или в соседний столбец формулу массива (вводится одновременным нажатием Контрл Шифт Ентер) и фильтр по ИСТИНА
Код
=И(B4:E4=0)

Или обычная формула
Код
=СЧЁТЕСЛИ(B2:E2;)
и фильтруете четверки
К сообщению приложен файл: 280716-1-1.xlsx(10Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеИли в соседний столбец формулу массива (вводится одновременным нажатием Контрл Шифт Ентер) и фильтр по ИСТИНА
Код
=И(B4:E4=0)

Или обычная формула
Код
=СЧЁТЕСЛИ(B2:E2;)
и фильтруете четверки

Автор - _Boroda_
Дата добавления - 28.07.2016 в 21:11
sv2014 Дата: Четверг, 28.07.2016, 21:23 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 156
Репутация: 37 ±
Замечаний: 0% ±

Excel 2013
Mark1976, добрый вечер,вариант макроса,кнопки test и повтор

[vba]
Код
Sub test()
   Dim z, i&: z = Range("A2:E" & Range("A" & Rows.Count).End(xlUp).Row).Value
  For i = UBound(z) To 1 Step -1
If z(i, 2) = 0 And z(i, 3) = 0 And z(i, 4) = 0 And z(i, 5) = 0 Then Rows(i + 1).Delete
   Next
End Sub
[/vba]
К сообщению приложен файл: example_28_07_2.xls(42Kb)
 
Ответить
СообщениеMark1976, добрый вечер,вариант макроса,кнопки test и повтор

[vba]
Код
Sub test()
   Dim z, i&: z = Range("A2:E" & Range("A" & Rows.Count).End(xlUp).Row).Value
  For i = UBound(z) To 1 Step -1
If z(i, 2) = 0 And z(i, 3) = 0 And z(i, 4) = 0 And z(i, 5) = 0 Then Rows(i + 1).Delete
   Next
End Sub
[/vba]

Автор - sv2014
Дата добавления - 28.07.2016 в 21:23
Mark1976 Дата: Четверг, 28.07.2016, 21:37 | Сообщение № 6
Группа: Проверенные
Ранг: Обитатель
Сообщений: 328
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Всем спасибо за помощь.
 
Ответить
СообщениеВсем спасибо за помощь.

Автор - Mark1976
Дата добавления - 28.07.2016 в 21:37
Mark1976 Дата: Суббота, 06.08.2016, 22:52 | Сообщение № 7
Группа: Проверенные
Ранг: Обитатель
Сообщений: 328
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
Здравствуйте. Скажите как в макросе, изменить диапазон, для удаления нолей.
[vba]
Код
Sub test()
Dim z, i&: z = Range("A2:E" & Range("A" & Rows.Count).End(xlUp).Row).Value
For i = UBound(z) To 1 Step -1
If z(i, 2) = 0 And z(i, 3) = 0 And z(i, 4) = 0 And z(i, 5) = 0 Then Rows(i + 1).Delete
Next
End Sub
[/vba]
 
Ответить
СообщениеЗдравствуйте. Скажите как в макросе, изменить диапазон, для удаления нолей.
[vba]
Код
Sub test()
Dim z, i&: z = Range("A2:E" & Range("A" & Rows.Count).End(xlUp).Row).Value
For i = UBound(z) To 1 Step -1
If z(i, 2) = 0 And z(i, 3) = 0 And z(i, 4) = 0 And z(i, 5) = 0 Then Rows(i + 1).Delete
Next
End Sub
[/vba]

Автор - Mark1976
Дата добавления - 06.08.2016 в 22:52
_Boroda_ Дата: Суббота, 06.08.2016, 23:04 | Сообщение № 8
Группа: Модераторы
Ранг: Экселист
Сообщений: 9346
Репутация: 3922 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Диапазон столбцов вот здесь (с ячейки А2)
[vba]
Код
Range("A2:E"
[/vba]
Последнюю строку макрос считает той, где в столбце А что-то написано: [vba]
Код
Range("A" & Rows.Count).End(xlUp).Row
[/vba]
Проверка нулей идет по столбцам В,C,D,E (2,3,4,5 столбцы): [vba]
Код
z(i, 2) = 0 And z(i, 3) = 0 And z(i, 4) = 0 And z(i, 5)
[/vba]


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеДиапазон столбцов вот здесь (с ячейки А2)
[vba]
Код
Range("A2:E"
[/vba]
Последнюю строку макрос считает той, где в столбце А что-то написано: [vba]
Код
Range("A" & Rows.Count).End(xlUp).Row
[/vba]
Проверка нулей идет по столбцам В,C,D,E (2,3,4,5 столбцы): [vba]
Код
z(i, 2) = 0 And z(i, 3) = 0 And z(i, 4) = 0 And z(i, 5)
[/vba]

Автор - _Boroda_
Дата добавления - 06.08.2016 в 23:04
Mark1976 Дата: Воскресенье, 07.08.2016, 18:10 | Сообщение № 9
Группа: Проверенные
Ранг: Обитатель
Сообщений: 328
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
_Boroda_, спасибо. Буду разбираться.
 
Ответить
Сообщение_Boroda_, спасибо. Буду разбираться.

Автор - Mark1976
Дата добавления - 07.08.2016 в 18:10
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Удалить строки в которых одни ноли. (Формулы/Formulas)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!