Существуют экселевские таблицы с данными в 5 колонок (документов таких "миллион" каждый день).
условные названия:
"100_0024_Timestamp.xlsx"
"100_0025_Timestamp.xlsx"
"100_0026_Timestamp.xlsx"
"100_0027_Timestamp.xlsx"
и т.д.
Как в Экселе сохранять такие файлы в форматах (конвертировать):
в
1) Текстовые файлы с разделителями табуляции (*.TXT)
и
2.1) CSV (разделители запятые) (*.CSV)
2.2) CSV (разделители точка-запятые) (*.CSV)
в той же папке, что и исходный файл, только Одним щелчком мыши (по кнопке, без диалоговых окон).
Макрос по автозаписи имеет вид и подходит только для файла с конкретно заданными одним именем, а нужно чтобы у каждого был свой, на основе исходного документа xlsx.
условные названия:
"100_0024_Timestamp.xlsx"
"100_0025_Timestamp.xlsx"
"100_0026_Timestamp.xlsx"
"100_0027_Timestamp.xlsx"
и т.д.
Как в Экселе сохранять такие файлы в форматах (конвертировать):
в
1) Текстовые файлы с разделителями табуляции (*.TXT)
и
2.1) CSV (разделители запятые) (*.CSV)
2.2) CSV (разделители точка-запятые) (*.CSV)
в той же папке, что и исходный файл, только Одним щелчком мыши (по кнопке, без диалоговых окон).
Макрос по автозаписи имеет вид и подходит только для файла с конкретно заданными одним именем, а нужно чтобы у каждого был свой, на основе исходного документа xlsx.
Код |
---|
Sub Макрос1() ' ' Макрос1 Макрос ' ' ChDir "C:\!!!MRK\XLSX" ActiveWorkbook.SaveAs Filename:="C:\!!!MRK\XLSX\100_0024_Timestamp.txt", _ FileFormat:=xlText, CreateBackup:=False End Sub C:\!!!MRK\XLSX\100_0024_Timestamp.txt - |