|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
04.06.2010, 13:39 | #1 |
Регистрация: 04.06.2010
Сообщений: 3
|
Перебор файлов Excel
Доброго времени суток !
Вопрос состоит в следующем как мне в макросе Excel получить список файлов по маске ".xls" из кататога откуда я открыл файл напрмер "консолидация.xls" ? |
04.06.2010, 13:41 | #2 |
Регистрация: 04.06.2010
Сообщений: 3
|
//server1/nev folder/консолидация.xls
|
04.06.2010, 15:40 | #3 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Макрос в каком файле будет находиться.Список куда выводить
Анализ,обработка данных Недорого
|
04.06.2010, 16:07 | #4 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Посмотрите здесь: http://excelvba.ru/code/FilenamesCollection
Там есть и функция, и пример её использования. Только замените строку ПутьКПапке = CreateObject("WScript.Shell").Speci alFolders("Desktop") на строку ПутьКПапке = thisworkbook.Path и строку Set coll = FilenamesCollection(ПутьКПапке, ".txt", 3) на строку Set coll = FilenamesCollection(ПутьКПапке, ".xls", 1)
__Полезные надстройки для Excel. Парсинг сайтов и файлов.
Макросы любой сложности на заказ. Мониторинг цен конкурентов Последний раз редактировалось EducatedFool; 04.06.2010 в 16:10. |
08.06.2010, 11:21 | #5 |
Регистрация: 04.06.2010
Сообщений: 3
|
Большое спасибо, очень помогло.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Импорт TXT файлов в Excel | Per4eLO | Microsoft Office Excel | 7 | 08.02.2017 19:33 |
сохранение файлов excel по ячейке | Keaf | Microsoft Office Excel | 13 | 05.10.2009 18:39 |
перебор файлов | Ralf_ru | Общие вопросы Delphi | 11 | 31.03.2009 14:23 |
Найти названия файлов из Excel | АLексаNдр | Microsoft Office Excel | 27 | 10.11.2008 16:55 |
Печать pdf файлов из списка файлов в Excel | АПС | Microsoft Office Excel | 5 | 15.04.2008 16:04 |