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

Вход

Регистрация

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

 

= Мир MS Excel/Удалить строку по условию - Мир MS Excel

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

2010
Здравствуйте

Посмотрел подобные темы, но мало что понял.
Требуется: в определённой колонке (в нашем случае D) найти определённое слово (в нашем случае internet). В случае нахождения (вхождения заданного набора символов в текст ячейки), эта строка удаляется.

Подскажите, что можно сделать. или VBA ?
К сообщению приложен файл: 4259674.xlsx(11Kb)


Сообщение отредактировал карандаш - Пятница, 22.04.2016, 09:39
 
Ответить
СообщениеЗдравствуйте

Посмотрел подобные темы, но мало что понял.
Требуется: в определённой колонке (в нашем случае D) найти определённое слово (в нашем случае internet). В случае нахождения (вхождения заданного набора символов в текст ячейки), эта строка удаляется.

Подскажите, что можно сделать. или VBA ?

Автор - карандаш
Дата добавления - 22.04.2016 в 09:34
_Boroda_ Дата: Пятница, 22.04.2016, 09:40 | Сообщение № 2
Группа: Модераторы
Ранг: Местный житель
Сообщений: 11541
Репутация: 4750 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Такой вариант тупым перебором
[vba]
Код
Sub tt()
    r1_ = Range("D" & Rows.Count).End(xlUp).Row
    For i = r1_ To 8 Step -1
        If InStr(Range("D" & i), "internet") Then
            Rows(i).Delete
        End If
    Next i
End Sub
[/vba]
Кстати да, забыл совсем про отключение обновления экрана и отключение событий и отключение пересчета и отключение сообщений
К сообщению приложен файл: 001-1-1.xlsm(18Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995


Сообщение отредактировал _Boroda_ - Пятница, 22.04.2016, 10:06
 
Ответить
СообщениеТакой вариант тупым перебором
[vba]
Код
Sub tt()
    r1_ = Range("D" & Rows.Count).End(xlUp).Row
    For i = r1_ To 8 Step -1
        If InStr(Range("D" & i), "internet") Then
            Rows(i).Delete
        End If
    Next i
End Sub
[/vba]
Кстати да, забыл совсем про отключение обновления экрана и отключение событий и отключение пересчета и отключение сообщений

Автор - _Boroda_
Дата добавления - 22.04.2016 в 09:40
карандаш Дата: Пятница, 22.04.2016, 09:43 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 327
Репутация: 8 ±
Замечаний: 0% ±

2010
Волшебная кнопка!

спасибо большое!
 
Ответить
СообщениеВолшебная кнопка!

спасибо большое!

Автор - карандаш
Дата добавления - 22.04.2016 в 09:43
карандаш Дата: Пятница, 22.04.2016, 09:51 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 327
Репутация: 8 ±
Замечаний: 0% ±

2010
А вот вопрос в догонку:

Когда строк много, то изображение дрожит (перерисовка где-то там происходит), а через некоторое время впадает в анабиоз и в шапке окна добавляется надпись в "(программа не отвечает)".
Потом она (он?) оживает и бодро рисует обновлённый лист без удалённых строк.

Были какие-то средства отключать вывод изображения, обрабатывать, потом включать вывод на экран.
Можно чем-то подобным обрамить код волшебной кнопки?

спасибо


Сообщение отредактировал карандаш - Пятница, 22.04.2016, 09:52
 
Ответить
СообщениеА вот вопрос в догонку:

Когда строк много, то изображение дрожит (перерисовка где-то там происходит), а через некоторое время впадает в анабиоз и в шапке окна добавляется надпись в "(программа не отвечает)".
Потом она (он?) оживает и бодро рисует обновлённый лист без удалённых строк.

Были какие-то средства отключать вывод изображения, обрабатывать, потом включать вывод на экран.
Можно чем-то подобным обрамить код волшебной кнопки?

спасибо

Автор - карандаш
Дата добавления - 22.04.2016 в 09:51
Pelena Дата: Пятница, 22.04.2016, 09:52 | Сообщение № 5
Группа: Модераторы
Ранг: Местный житель
Сообщений: 11599
Репутация: 2572 ±
Замечаний: 0% ±

Excel 2010, 2016 & Mac Excel
отключать вывод изображения

Пользуйтесь поиском
http://www.excelworld.ru/board....-1-0-11
Если не разберетесь, создавайте новую тему


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
Сообщение
отключать вывод изображения

Пользуйтесь поиском
http://www.excelworld.ru/board....-1-0-11
Если не разберетесь, создавайте новую тему

Автор - Pelena
Дата добавления - 22.04.2016 в 09:52
карандаш Дата: Пятница, 22.04.2016, 13:37 | Сообщение № 6
Группа: Проверенные
Ранг: Обитатель
Сообщений: 327
Репутация: 8 ±
Замечаний: 0% ±

2010
Спасибо! вы очень помогли!
 
Ответить
СообщениеСпасибо! вы очень помогли!

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

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