Есть файл, называется MM00001_SET21_02T_221205_000232308.TXT
Хвост 221205 и 000232308 каждый день меняется.
С датой все более менее понятно, а вот с последними 9-ю цифрами вышла проблема - не могу найти, как написать чтобы на этот хвост поиск не заморачивался. Через * или # у меня так и не получилось его прописать. Делал вот как
- Код: Выделить всё
Set fs1 = Application.FileSearch
xFile1 = Format([Forms]![MainForm]![TodayDate] - 1, "DDMMYY")
With fs1
.LookIn = "J:\1\2\\"
xFile = "*.txt"
xFileOld = "MM00001_SET21_02T_" & xFile1 & "_" & xFile & ""
xFileFullOld = .LookIn + xFileOld
End With
Что я только не пытался сделать, но никак не получается. Думаю что решение будет очень простым, посто я его не вижу
Спасибо.
