Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / тип файла в "Save as ..." (для excel) ??? / 4 сообщений из 4, страница 1 из 1
25.02.2004, 18:09
    #32421480
d2e8k
d2e8k
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
тип файла в "Save as ..." (для excel) ???
Привет!
Пытаюсь для Excel'я сделать макрос (на VB) для преобразования из dbf-файла в txt. Т.е. открываешь dbf-файл, вызываешь макрос и с его помощью сохраняешь ("Save as ..."), указывая название файла, и файл при этом сохраняется как "Текстовый (с разделителями табуляции)". Но я не знаю какой тип файла (FileFormat) указывать (а вернее, все перебрал - ни один не подходит).

Do
fName = Application.GetSaveAsFilename
Loop Until fName <> False
ActiveWorkbook.SaveAs FileName:=fName, _
FileFormat:=xlCSVMSDOS, CreateBackup:=False

Кто может подсказать как это сделать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.02.2004, 12:04
    #32422207
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
тип файла в "Save as ..." (для excel) ???
"Прежде чем ударить по мячу, сядь и подумай, в ту ли сторону ты бьёшь?!!!" - советовал А.Райкин, обращаясь к футболистам, "отъезжающим за рубёж"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.02.2004, 09:43
    #32423665
22
22
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
тип файла в "Save as ..." (для excel) ???
А чем не подходит? Скажем "FileFormat=xlTextMSDOS"?
Другой путь есть -- надо считать dbf файл в массив, а потом этот массив с помощью функции "Output" записать в текстовый файл. Или использовать для этих целей ADO.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.02.2004, 11:45
    #32423919
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
тип файла в "Save as ..." (для excel) ???
Если сесть, почитать "здесь и вокруг" и подумать, как другие люди решают аналогичные (не очень сложные) задачи, то напрашивается решение:
Записать макрос макрорекордером и проанализировать созданный код.
Получим код:
Код: plaintext
1.
2.
3.
4.
5.
6.
Sub Макрос1()
    ChDir  "C:\BASE" 
    Workbooks.Open Filename:= "C:\BASE\sfa_dbf.DBF" 
    ActiveWorkbook.SaveAs Filename:= "C:\BASE\sfa_dbf.txt" , _
        FileFormat:=xlTextMSDOS, CreateBackup:=False
End Sub

Sapienti sat!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / тип файла в "Save as ..." (для excel) ??? / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]