Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.04.2015, 10:48   #1
EdoBedo
 
Регистрация: 26.03.2015
Сообщений: 4
Вопрос Поиск файлов в папке и подпапке и вывод в listbox

Здравствуйте, как вывести файлы например .doc в listbox из папки и подпапок. У меня есть программа с выводом только файлов из папки, подпапки не ищет. Использовал Dir. Сказали что через Dir рекурсию нельзя сделать.
Нашел способ через fso вот ссылка: http://excelvba.ru/code/filenamescollection но там выводится в ячейки таблицы, а надо в listbox, может кто помочь, спасибо!
EdoBedo вне форума Ответить с цитированием
Старый 08.04.2015, 11:01   #2
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Там по ссылке пяток примеров использования, Вам для всех нужен пример как прикрутить листбокс? Да и ещё листбоксов может быть как минимум 3 варианта...
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 08.04.2015, 11:12   #3
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

EdoBedo,
осталось найти как диапазон запихнуть в listbox - и дело сделано!!!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 08.04.2015, 11:29   #4
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Можно и без диапазона, сразу в цикле или через массив запихнуть. Но что и куда?
P.S. Да, ещё - думаю в листбоксе нужны не полные имена файлов, а при выборе - уже полные. Но может хочется видеть полные?
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 08.04.2015 в 11:36.
Hugo121 вне форума Ответить с цитированием
Старый 08.04.2015, 11:58   #5
EdoBedo
 
Регистрация: 26.03.2015
Сообщений: 4
По умолчанию

Для всех пример не нужен, на форме есть кнопка, выбора папки, и после выбора, чтобы выводила .doc файлы из этой папки и подпапок в listbox
EdoBedo вне форума Ответить с цитированием
Старый 08.04.2015, 12:08   #6
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Ага, ну хоть прозвучало слово "форма" - уже что-то.
Теперь ждите пока кто-то изготовит эту форму с листбоксом и кнопкой и кодом выбора папки.
Т.е. пока сделает за Вас всё с нуля. Хотя вопрос то ведь только "как вывести файлы например .doc в listbox из папки и подпапок."
Пример ведь не нужен.

Или как вариант - может Вам достаточно пару строк кода заполнения листбокса?
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 08.04.2015 в 12:24.
Hugo121 вне форума Ответить с цитированием
Старый 08.04.2015, 12:20   #7
EdoBedo
 
Регистрация: 26.03.2015
Сообщений: 4
По умолчанию

Извиняюсь! Вот мой пример, без рекурсии
пример.zip
EdoBedo вне форума Ответить с цитированием
Старый 08.04.2015, 12:35   #8
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Ну вот, спасибо.
Так там ещё и ListBox1_Change() нужно будет менять, или сам листбокс делать в несколько столбцов, или ещё как иначе придумывать. Не на 5 минут работа. Я пока пас, некогда, обед почти... Да и вообще у меня 2003 и файл выложить я с работы не могу
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Lazarus в Linux - Поиск файлов в папке BLACK_RAIN Lazarus, Free Pascal, CodeTyphon 4 08.10.2014 11:23
Поиск файлов по маске и нахождения общего размера найденных файлов и вывод в терминал Колямбий Помощь студентам 0 21.04.2013 21:31
Поиск файлов в папке и ПОДПАПКАХ trafbite Общие вопросы Delphi 5 03.09.2012 19:54
Как сделать поиск файлов в папке BETONOMESHALKA Общие вопросы Delphi 3 01.02.2008 22:43
Отслеживает появление в папке файлов. слежение за определенным файлом в определенной папке. RammFan Win Api 1 09.06.2007 11:09