Макрос VBA - удалить непокрашенные строки

Lem625
На сайте с 11.02.2007
Offline
134
1494

Люди! Кто знает синтаксис VBA помогите плиз - нужен макрос, который бы по всему экселевскому файлу удалял строки БЕЗ ФОНА.

Т.е. нужные строки (которые нужно оставить в живых) покрашены в определенный цвет - напр. в желтый. Покрашены целиком: от начала "до бесконечности".

По смыслу макрос простейший, но если нужна оплата - пишите , договоримся.

DyaDya
На сайте с 11.04.2007
Offline
147
#1

В принципе, можете потренироваться и сами до истины добраться.

Делается это так.

1. Запускаете запись макроса в экселе.

2. И делаете типовые действия: красите ячейку в жёлтый цвет, убирате жёлтый цвет, удаляете одну ячейку, удаляете всю строку...

3. Останавливаете запись.

Всё, почти все типовые действия будут в вашем макросе. Осталось только написать свой макрос с циклом пробегающим по всем ячейкам (причём не надо до бесконечности), проверяющий их на желтизну и в случае совпадения удаляете.

---

Выбирайте качественный хостинг (http://vashmaster.ru/informaciya/o_poleznyh_programmah/news83.php) и продвигайте сайты в СЕОПУЛЬТ (http://seopult.ru/ref.php?ref=72b5ed9561fe66a1). А на «SAPE» я в обиде :) Не упрекайте за очепятки, пишу вслепую (http://ergosolo.ru/) и также делаю сайты (http://www.vashmaster.ru/) ;)
Lem625
На сайте с 11.02.2007
Offline
134
#2
DyaDya:
В принципе, можете потренироваться и сами до истины добраться.
Делается это так.

1. Запускаете запись макроса в экселе.
2. И делаете типовые действия: красите ячейку в жёлтый цвет, убирате жёлтый цвет, удаляете одну ячейку, удаляете всю строку...
3. Останавливаете запись.

Всё, почти все типовые действия будут в вашем макросе. Осталось только написать свой макрос с циклом пробегающим по всем ячейкам (причём не надо до бесконечности), проверяющий их на желтизну и в случае совпадения удаляете.
---

В принципе конешна. Только удалять нужно все КРОМЕ желтого ;) .

Только цикл в объектно-ориентированном языке это для меня сложно.

Кто-там чей объект/свойство... я буду это делать ЧАСЫ. А знакомый с синтаксисом человек сделает это за 2 минуты.

Антон Лавеев
На сайте с 31.10.2005
Offline
408
#3

Lem625, в офисе (последнем) есть фильтр по цвету, чего вы паритесь?

☠️☠️☠️
Lem625
На сайте с 11.02.2007
Offline
134
#4
Tarry:
Lem625, в офисе (последнем) есть фильтр по цвету, чего вы паритесь?

"Последний" это какой? Где именно есть?

PS. Если эта возможность и есть - ясно же из контекста, что я про нее не знаю. Чего б не указать сразу? 🙄

"- Скажите как проехать к ЛенКому?

- Чего вы паритесь, есть же карта Москвы..."

Антон Лавеев
На сайте с 31.10.2005
Offline
408
#5

Offiice 2007

Данные -> Фильтр -> фильтр по цвету ячейки

Lem625
На сайте с 11.02.2007
Offline
134
#6

Спасибо, найду этот офис, попробую.

Авторизуйтесь или зарегистрируйтесь, чтобы оставить комментарий