2003/XP/2000 - Распарсить XLS и получить интересующие данные во внешний файл

Iska · Отправлено: **14:22, 28-01-2014** | #2

Упакуйте Ваш файл в архив. Прикрепите архив к сообщению.

bagfinder · сводка-27.01.2014.zip

Сделал

bagfinder · Отправлено: **17:46, 28-01-2014** | #4

Набросал форму, некоторые тезисы по поводу функционала:
1. Пользователь вводит фамилию в текстовое поле
2. Нажимает кнопку Поиск записей
3. В текстбокс падают строки, где присутствует введенная фамилия
4. При желании, пользователь нажимает на кнопку Запись в файл, происходит экспорт

Iska · Отправлено: **08:26, 29-01-2014** | #5

Примерно так: сводка-27.01.2014 (2).7z.

Диапазон преобразован в список. Добавлена форма для фильтрации по выбранной/введённой фамилии, для экспорта отфильтрованного списка в новую рабочую книгу (её сохранение делать не стал).

bagfinder · Отправлено: **09:28, 29-01-2014** | #6

Цитата:

Диапазон преобразован в список.

Нужно универсальное средство, которое бы подошло для множества документов такого типа.
Макрос можно быстро запустить для другого подобного файла.

Iska · Отправлено: **10:15, 29-01-2014** | #7

bagfinder, а почему Ваши пользователи не используют списки?

Расскажите, как Вы предлагаете определять потребный диапазон? У нас есть ровно четыре варианта — «ручками» и «Selection» + «.UsedRange»/«.CurrentRegion».

bagfinder · Отправлено: **10:45, 29-01-2014** | #8

Цитата:

а почему Ваши пользователи не используют списки?

Эти таблицы присылают уже в готовом виде, так что пользователь просто анализирует полученное.
Ну и уровень владения excel у пользователя нулевой, так что, чем проще и очевиднее интерфейс, тем лучше.

Цитата:

У нас есть ровно четыре варианта — «ручками» и «Selection» + «.UsedRange»/«.CurrentRegion».

А нельзя просто сравнить UserForm1.SurnameTextbox.Value с B2-B... и вывести строки со вхождением?
С VBA я не знаком, не знаю, что лучше.

Iska · Отправлено: **11:29, 29-01-2014** | #9

Цитата bagfinder:

Эти таблицы присылают уже в готовом виде, так что пользователь просто анализирует полученное. »

Есть прямой смысл научить их пользоваться списками.

Цитата bagfinder:

Ну и уровень владения excel у пользователя нулевой, так что, чем проще и очевиднее интерфейс, тем лучше. »

Горячую клавишу нажать смогут? Или как предполагается вызывать форму на исполнение?

Цитата bagfinder:

А нельзя просто сравнить UserForm1.SurnameTextbox.Value с B2-B... и вывести строки со вхождением? »

Так проблема в том-то и состоит, чтобы определить:

«B» ли это (а не «C», «D» или «AH»);
с «2» ли это (а не с «3», «4» или «1»);
и главное — а докуда это самое «…»?

Ещё остаются вопросы с выбором конкретного рабочего листа, если их несколько.

Цитата bagfinder:

С VBA я не знаком, не знаю, что лучше. »

Давайте я опишу, а Вы выберете.

«ручками» — предлагается указать адрес диапазона, с которым будем работать.
«Selection» — существующее выделение. Для простоты будем предполагать простое прямоугольное выделение на одном листе.
«.UsedRange» — использованный диапазон на рабочем листе. От крайней левой верхней использованной ячейки до крайней правой нижней использованной ячейки.
«.CurrentRegion» — заполненный диапазон, считающийся от текущего выделения. Проще всего его представить как прямоугольную область, ограниченную пустыми строками и столбцами по краям.

Типичным является использование следующего сценария — выделить любую ячейку внутри диапазона и вызвать форму. Та начинает работать, например, с Selection.CurrentRegion.

bagfinder · Отправлено: **11:40, 29-01-2014** | #10

Цитата:

«.UsedRange» — использованный диапазон на рабочем листе. От крайней левой верхней использованной ячейки до крайней правой нижней использованной ячейки.

Как мне видится, это подходящий вариант.

P.S. Рабочий лист один
P.P.S. Первая строка - заголовки (Дата/Время, Фамилия и т.п.), остальное - данные.