Как обратиться к дате создания файла

[Алекс7]

Нужно открыть только файл, который создан сегодня (брать системную дату). Он будет только 1!!!

Open "C:\" & Dir("C:\sordcarc.*") For Input As #1

[EducatedFool]

Может, отсюда почерпнёте идею...
http://excelvba.ru/code/LastFile

При помощи функции Dir перебираете все файлы в папке (по маске "C:\sordcarc.*")
а потом обрабатываете лишь те, для которых функция FileDateTime возвращает текущую дату

Как получить список файлов - примеров на форуме множество.
Ну или так можно: http://excelvba.ru/code/FilenamesCollection

[Алекс7]

А покороче никак нельзя?

[Казанский]

Пробуйте

Sub TestFileSearch()
With Application.FileSearch
    .LastModified = msoLastModifiedToday
    .LookIn = "c:\"
    .Filename = "sordcarc.*"
    Select Case .Execute
    Case 0: MsgBox "Файл не найден", vbCritical
    Case Is > 1: MsgBox "Более одного файла", vbExclamation
    Case Else
        MsgBox .FoundFiles(1)
    End Select
End With
End Sub