|
Отдельные файлы в зависимости от фильтра
|
|
|
|
buk |
Пятница, 28 Сентября 2007, 10:14
|
Участник
Профиль
Группа: Участник
Сообщений: 20
Регистрация: 06.03.2007
Из: СПб
Пользователь №: 14233
Конфигурация
Корпус: -- Процессор: Другой Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: Нет дисковода CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Подскажите, как в Excel, с помощью макроса сделать фильтр в столбце F по параметру "Приправы" и отфильтрованные данные сохранить в отдельном файле (D:/pect/Приправы.xls).
Затем сделать фильтр в столбце F по параметру "Овощи" и отфильтрованные данные сохранить в отдельном файле (D:/pect/Овощи.xls).
И так далее по всем параметрам, которые есть в столбце F ? Т.е. сколько параметров в столбце F, столько и отдельных файлов.
Заранее спасибо.
Сообщение отредактировал buk - Пятница, 28 Сентября 2007, 10:16
--------------------
Не спешите с выводами - они тоже претерпевают изменения.
|
|
|
|
|
pashulka |
Пятница, 28 Сентября 2007, 14:36
|
Участник
Профиль
Группа: Участник
Сообщений: 216
Регистрация: 13.07.2003
Пользователь №: 5551
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Посмотрите этот пример, возможно он окажется Вам полезен ...
|
|
|
|
|
buk |
Пятница, 28 Сентября 2007, 17:11
|
Участник
Профиль
Группа: Участник
Сообщений: 20
Регистрация: 06.03.2007
Из: СПб
Пользователь №: 14233
Конфигурация
Корпус: -- Процессор: Другой Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: Нет дисковода CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Пример, мне подходит. Спасибо. Только есть 2 момента. 1.Как сделать, чтобы формат файла при сохранении оставался прежним (Пропадают примечания и размеры ячеек меняются) 2.Один столбец у меня имеет внутри себя два столбца. Т.е у двух столбцов -->>Одно название. при сохранении в файлы получается, что левый столбец остается, а правый - пустой. Можно как-то исправить?
--------------------
Не спешите с выводами - они тоже претерпевают изменения.
|
|
|
|
|
pashulka |
Пятница, 28 Сентября 2007, 18:50
|
Участник
Профиль
Группа: Участник
Сообщений: 216
Регистрация: 13.07.2003
Пользователь №: 5551
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Исправить … но ведь это не ошибка, а особенность работы расширенного фильтра, который, как Вы совершенно верно заметили, при копировании оставляет за бортом примечания (и не только, кстати) и об'единённые ячейки (то, что Вы называете два в одном) Впрочем, если Вам это действительно нужно, то можно проделать следующее : вместо того, чтобы 'копировать результат в другое место' можно отфильтровать исходную таблицу (т.е. в цикле заменить xlFilterCopy на xlFilterInPlace и убрать CopyToRange) и только затем копировать нужные данные, но это Вы можете проделать и самостоятельно. Для этого, достаточно скопировать нужные данные вручную (причём так, чтобы полученный, после копирования результат, отвечал Вашим требованиям) и записать свои действия макрорекордером (Сервис-Макрос-Начать запись-...нужные действия, то бишь копирование...-Остановить макрос) После записи Вы можете проанализировать код, убрать весь мусор, как-то ненужное выделение, активация окон и т.п. и использовать его в исходном макросе.
|
|
|
|
|
buk |
Пятница, 05 Октября 2007, 8:38
|
Участник
Профиль
Группа: Участник
Сообщений: 20
Регистрация: 06.03.2007
Из: СПб
Пользователь №: 14233
Конфигурация
Корпус: -- Процессор: Другой Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: Нет дисковода CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Спасибо, я всё сделал. Работает.
--------------------
Не спешите с выводами - они тоже претерпевают изменения.
|
|
|
|
|
|
1 чел. читают эту тему (1 Гостей и 0 Скрытых Пользователей)
|
0 Пользователей:
|
|
© Copyright by WinCity.Ru 2001 - 2008 | Обратная связьУслуги веб-хостинга предоставлены компанией MTW.RU
|
|