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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 18.10.2013, 09:32   #11
Alexsandrr
Пользователь
 
Регистрация: 02.10.2013
Сообщений: 78
По умолчанию

Или в Module2 поменять это:
Function GetFolderPath(Optional ByVal Title As String = "Выберите папку", _
Optional ByVal InitialPath As String = "c:\") As String
на это:
Function GetFilePath(Optional ByVal Title As String = "Выберите папку", _
Optional ByVal InitialPath As String = "c:\", _
Optional ByVal FilterDescription As String = "Книги Excel", _
Optional ByVal FilterExtention As String = "*.xlsx*") As String
Alexsandrr вне форума Ответить с цитированием
Старый 18.10.2013, 11:33   #12
Alexsandrr
Пользователь
 
Регистрация: 02.10.2013
Сообщений: 78
По умолчанию

Вопрос снят, я разобрался
Alexsandrr вне форума Ответить с цитированием
Старый 18.10.2013, 19:35   #13
maksim_serg
Форумчанин
 
Аватар для maksim_serg
 
Регистрация: 25.03.2010
Сообщений: 417
По умолчанию

И правильно делает. что не видит.

наверно так:
Код:
Set coll = FilenamesCollection(InvoiceFolder$, "*Заявка*ФПК*кв*.xls*")
maksim_serg вне форума Ответить с цитированием
Старый 19.10.2013, 13:31   #14
Alexsandrr
Пользователь
 
Регистрация: 02.10.2013
Сообщений: 78
По умолчанию

При выборе папки он и не должен видеть книги.
Я так все оставил и все загружает
Set coll = FilenamesCollection(InvoiceFolder$, "*.xls*")
Alexsandrr вне форума Ответить с цитированием
Старый 19.10.2013, 14:16   #15
maksim_serg
Форумчанин
 
Аватар для maksim_serg
 
Регистрация: 25.03.2010
Сообщений: 417
По умолчанию

да, но тогда если в папке случайно окажется файл с названием, скажем "База данных, единственная копия. Не удалять!" Ваш макрос и ее переварит)
maksim_serg вне форума Ответить с цитированием
Старый 19.10.2013, 14:30   #16
Alexsandrr
Пользователь
 
Регистрация: 02.10.2013
Сообщений: 78
По умолчанию

Я с Вами согласен. Но у меня конкретная папка с книгами обрабатывается(путь я прописал).
Я сначала сохраняю в папке нужные книги затем включаю макрос.
Alexsandrr вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Прошу помощи:) valiza Помощь студентам 0 03.07.2009 11:58
Excel в xml, прошу помощи CaH4oo Microsoft Office Excel 4 20.12.2008 09:31
Прошу помощи! Oksana Общие вопросы Delphi 6 11.02.2007 18:36