Import data from an excell workbook

[Nicolas Beaupré]

I got an excell workbook “blast2” witch is inserted in my database. I want to access the data in it or import it in DataSets. This workbook as more than one sheet. I’ve put an exemple of that workbook in attachment.

I’ve created an ExcelFolder object that way and it refer to the correct element.

Dim fExcell As ExcelFolder
Set fExcell = ActiveDatabase.RootFolder.Object("blast2", fpObjectTypeExcelWorkbook)

How can I access, for exemple, the data in the C:5 cell of the tir1 sheet ?

[Nicolas Beaupré]

I got an excell workbook “blast2” witch is inserted in my database. I want to access the data in it or import it in DataSets. This workbook as more than one sheet. I’ve put an exemple of that workbook in attachment.

I’ve created an ExcelFolder object that way and it refer to the correct element.

Dim fExcell As ExcelFolder
Set fExcell = ActiveDatabase.RootFolder.Object("blast2", fpObjectTypeExcelWorkbook)

How can I access, for exemple, the data in the C:5 cell of the tir1 sheet ?

[Bernhard Kantz]

You can create a ExcelDataLink.

In VBA you could use this code:

    Dim oExcel As ExcelFolder
    Set oExcel = ActiveDatabase.RootFolder.Object("blast2", fpObjectTypeExcelWorkbook)
    With oExcel.Add("data", fpObjectTypeExcelDataLink)
        .YComponent = "tir1!C5"
        .YLineByLine = True
        '.Evaluate
        .Update
    End With

support@weisang.com

[Autor]

Beiträge