Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Определить неизвестный диапазон / 9 сообщений из 9, страница 1 из 1
25.04.2017, 13:16
    #39444034
QwDl
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
Добрый день!

Решил начать автоматизацию рабочего отчета. В VBA не шарю(((. Решил все разбить на задачи и делать по-этапно, решая проблемы по мере их поступления.

Задача для Вас Господа простая, для меня превратилась в несколько часов геморроя. И так - каждый раз по заданному условию автофильтра, выдается разное количество строк, которые нужно удалить. Как определить это количество строк?

Предположил что это может быть как то связанно с объектом (?) Rows. Начал читать и только запутался.

В отчаяние, прошу помощи!
...
Рейтинг: 0 / 0
25.04.2017, 13:33
    #39444055
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
Не очень понятен вопрос. Нужно получить, какое количество строк отображается текущим фильтром?
...
Рейтинг: 0 / 0
25.04.2017, 13:35
    #39444057
QwDl
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
Да, нужно определить это количество строк и удалить их.
...
Рейтинг: 0 / 0
25.04.2017, 13:39
    #39444063
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
PS. VBA для этой задачи не нужен. Решается формулой
Код: vbnet
1.
2.
=ПРОМЕЖУТОЧНЫЕ.ИТОГИ(2;[диапазон])
=SUBTOTAL(2;[диапазон])
...
Рейтинг: 0 / 0
25.04.2017, 13:43
    #39444068
QwDl
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
А хотелось бы все таки в использовать Vba
...
Рейтинг: 0 / 0
25.04.2017, 14:08
    #39444100
QwDl
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
Вопрос решен с помощью selection.EntireRow.Delete. Всем спасибо
...
Рейтинг: 0 / 0
25.04.2017, 14:21
    #39444112
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
QwDl,

не мешало бы добавить сюда specialCells(xlVisible). И проверку, что хоть что-то отфильтровалось вообще.
Иначе можно удалить не только то, что отфильтровано...
...
Рейтинг: 0 / 0
25.04.2017, 14:46
    #39444126
QwDl
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
авторThe_PristspecialCells(xlVisible) - понял прочитаю

А вот проверку как организовать, подскажите?
...
Рейтинг: 0 / 0
25.04.2017, 16:01
    #39444167
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определить неизвестный диапазон
QwDl,

Вам виднее. У нас ни файла, ни критериев фильтрации. Что подсказывать-то?
Образно говоря, если условие будет таким, что будут скрыты все строки диапазона, то SpecialCells вполне может выдать не тот результат, который ожидается, если применен к Selection. Например, заголовок удалите...
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Определить неизвестный диапазон / 9 сообщений из 9, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]