Импорт внешних данных из *.dbf в Excel.

[agregator]

Здравствуйте, уважаемые программисты, напишите пожалуйста, как импортировать данные из файла*.dbf в Excel.

Файл "Ремонт.dbf" могу открыть Microsoft Visual FoxPro и экпортировать в Excel. А как в Excel 2003 получить данные из "Ремонт.dbf"?

Пробовал создать запрос, но не получается (при Создании нового источника данных ,не могу выбрать драйвер для требуемого типа базы данных, чтобы работала функция Связь).

Как это сделать?

[ty4e4ka]

мне тоже интересен этот вопрос, может кто подскажет? вернее задача такая: данные из 3-х файлов, надо занести в excel файл, 1 dbf=1 лист в книге excel, т.о. должна получиться книга с 3 мя листами данных из dbf файлов. вот тут есть нечто похожее http://www.programmersforum.ru/showt...ight=dbf+excel, но этот макрос помещает все данные на одну страницу, не мой вариант )

[SAS888]

Следующий макрос "вытащит" данные из всех dbf файлов в указанной папке и поместит их в отдельные листы. Имена листов будут соответствовать именам dbf файлов. Если лист с таким именем уже существует, то он будет заменен.

Sub DBF()
    Dim p As String, f As String, wb As Workbook
    Application.ScreenUpdating = False: Application.DisplayAlerts = False
    With Application.FileDialog(msoFileDialogFolderPicker)
        .Title = "Укажите рабочую папку": .Show
        If .SelectedItems.Count = 0 Then Exit Sub Else p = .SelectedItems(1) & "\"
    End With
    f = Dir(p & "*.dbf")
    Do While f <> ""
        Set wb = Workbooks.Open(p & f)
        On Error Resume Next: ThisWorkbook.Sheets(wb.Name).Delete: On Error GoTo 0
        ThisWorkbook.Sheets.Add.Name = wb.Name
        wb.Sheets(1).UsedRange.Copy ThisWorkbook.ActiveSheet.[A1]
        wb.Close False: f = Dir
    Loop
End Sub

[ty4e4ka]

"Следующий макрос "вытащит" данные из всех dbf файлов в указанной папке и поместит их в отдельные листы. Имена листов будут соответствовать именам dbf файлов. Если лист с таким именем уже существует, то он будет замен."

Спасибочки, спасибочки, все красивенько работает!

[konor_djon]

А как бы сделать, чтобы оно загружало не по листам а в один лист и указывать только основной каталог, а по подкаталогам оно само выбирало?
Заранее спасибо!

[SAS888]

Посмотрите здесь.