Удаление диапазона по условию

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

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

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удаление диапазона по условию (Макросы/Sub)

QwertyBoss

Дата: Суббота, 31.10.2015, 15:01 | Сообщение № 1

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

Ранг: Участник

Сообщений: 87

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

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

Excel 2010

Выручайте форумчане! Перерыл весь интернет

!!! Нужен макрос для удаления заданного диапазона по условию, а условие таково: удалить строки которые находятся между СТРОКАМИ со словами "Текущие работы" и "Перспективные работы", но только не наоборот :-) Пример прилагаться.загвоздка в том что некоторые строки объедены, и их разное кол-во. Тема создана в Планета Ексель. Спс. за ранее....
[moder]Ссылочку-то на Планету дайте. А то там найти что-то иногда бывает довольно-таки затруднительно.

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

Сообщение отредактировал _Boroda_ - Суббота, 31.10.2015, 16:22

Ответить

SLAVICK

Дата: Суббота, 31.10.2015, 15:52 | Сообщение № 2

Группа: Модераторы

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

Сообщений: 2290

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

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

2019

Можно без макроса - доп. столбце пишем формулу;

Код

=ЕСЛИ(ЕОШИБКА(ПОИСКПОЗ("*работы*";B10:H10;0));I9;ГПР("*работы*";B10:H10;1;0))

Потом фильтруем на Текущие работы
Выделяем по столбцу до конца таблицы --- shift пробел --- ctrl -

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

Иногда все проще чем кажется с первого взгляда.

Ответить

QwertyBoss

Дата: Суббота, 31.10.2015, 16:22 | Сообщение № 3

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

Ранг: Участник

Сообщений: 87

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

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

Excel 2010

SLAVICK спс.

Ответить

QwertyBoss

Дата: Суббота, 31.10.2015, 16:47 | Сообщение № 4

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

Ранг: Участник

Сообщений: 87

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

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

Excel 2010

http://www.planetaexcel.ru/forum....sloviyu

Ответить

Wasilich

Дата: Суббота, 31.10.2015, 19:55 | Сообщение № 5

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

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

Сообщений: 1232

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

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

2003

На Планете Kuzmich сделал свои замечания и выложил код. Ну и я выскажусь.
Таблица - ужас!!! Зачем такие издевательства с объединением ячеек? Это же чистейшей воды "гемор", создающий проблемы и макросам и формулам. Советую всячески избегать объединения ячеек.
В моем примере, используется доп столбец для установки меток напротив не нужных строк и следующим циклом снизу вверх они удаляются.

К сообщению приложен файл: QwertyBoss.xls (73.0 Kb)

Сообщение отредактировал Wasilic - Суббота, 31.10.2015, 19:59

Ответить

QwertyBoss

Дата: Воскресенье, 01.11.2015, 07:17 | Сообщение № 6

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

Ранг: Участник

Сообщений: 87

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

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

Excel 2010

Цитата Wasilic, 31.10.2015 в 19:55, в сообщении № 5

Таблица - ужас!!! Зачем такие издевательства с объединением ячеек? Это же чистейшей воды "гемор", создающий проблемы и макросам и формулам. Советую всячески избегать объединения ячеек.

С Вами полностью согласен, но по другому никак. Начальство не принимает другой вид. Поэтому и приходится прорывать через терни к звёздам

. Трудности закаляют

. За решение спс. обязательно попробую... Два сайта (и люди) которые реально выручают. Спс. и низкий Вам поклон... Может и сам вскоре научусь, и буду другихъ учить deal

Ответить

QwertyBoss

Дата: Воскресенье, 01.11.2015, 07:21 | Сообщение № 7

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

Ранг: Участник

Сообщений: 87

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

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

Excel 2010

Попробывал. РАБОТАЕТ. Спс. и Вам и Кузьмичу (у него тоже работает). Для разных таблиц мне понабятся оба решения). СПС!

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удаление диапазона по условию (Макросы/Sub)

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