Открытие через наиболее свежего файла через vba

Kuzco Гость	#1 17.07.2012 14:54:04 У меня есть двопбоксовский каталог(c:\\Dropbox), куда скидываются еженедельно файлы. Можно ли через vba открыть последние два файла?

0011SX

Пользователь

Сообщений: 37 Регистрация: 01.01.1970

17.07.2012 15:41:27

Устройте проверку в зависимости от того, что вам конкретно нужно.
Пример кода:

Sub Пример()

Set FSO = CreateObject("Scripting.FileSystemObject")
Set File = FSO.GetFile("c:\Dropbox\*.*") 'тут путь и имя файла
mStr = mStr & "Дата создания - " & File.DateCreated & vbCrLf
mStr = mStr & "Дата последнего доступа - " & File.DateLastAccessed & vbCrLf
mStr = mStr & "Дата последней модификации - " & File.DateLastModified & vbCrLf
MsgBox mStr

End Sub

EducatedFool Пользователь Сообщений: 3697 Регистрация: 23.12.2012	#3 17.07.2012 15:50:52 Этот код вам поможет: Поиск самого нового файла в папке (с просмотром подпапок) http://excelvba.ru/code/lastfile Функция LastFile предназначена для поиска самого свежего файла в заданной папке (производится поиск файлов по маске, и из найденных файлов выбирается тот, дата последнего изменения которого максимальна) Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Читают тему