|
|
|
| Господа, а кто-нибудь делал макросом то же, что и "Сохраненные операции импорта" в 2007 Аксе.
Хотелось бы выдернуть код, который записывается при сохранении такого импорта.
Основная задача - прикрутить к нему еще окошко выбора импортируемого файла, т.к. приходится ежедневно импортить несколько файлов с разным именем, а записанный мастером импорт ссылается только на конкретное имя и папку. Получается импортировав однажды 1 файл с именем test_11_01_01.csv - приходится переименовывать каждый файл руками на аналогичное имя. И запускать мастера.
Думаю прикрутить процедуру, которая переименовывала бы поочередно файлы (в конкретной папке например), а затем запускала этот мастер. Но опять же неясно как из VBA его запустить
Никто не сталкивался?
P.S. Гуглил, да ничего ненавыгулил. | |
|
| |
|
|
|
|
sub a1103171346()
s1=dir("*.csv")
do while len(s1)>0
copyfile s1,test_11_01_01.csv
'''или filecopy --забыла
вызов макроса импорта test_11_01_01.csv
s1=dir
loop
end sub
|
| |
|
| |
|
|
|
| Спасибо! С этим и сам разобрался.
DoCmd.RunSavedImportExport ("test") помогло, а уж переименовывать файл можно 1000 и 1 способом.
P.S. Хотя было бы классно еще и код этого SavedImportExport поглядеть. Но это уже для общего развития | |
|
| |
|
|
|
| Не созданы мы для легких путей... (х/ф "Добровольцы")
Есть старый-добрый TransferText, котрорый делает то же самое, но ему можно подставить любой путь, который, в свою очередь, можно получить с помощью объекта FileDialog. | |
|
| |