kile til simpel program der viser data fra excel

VB eller VBA?

Function ReadExcelSheet()
Dim objXL As Excel.Application
Dim objActiveWkb As Excel.Workbook
Dim iCol As Integer, iRow As Integer

    On Error Resume Next
   
    Set objXL = CreateObject("Excel.Application")
    With objXL.Application
       
        'Make Excel visible
        '.Visible = True
       
        'Open the Workbook
        .Workbooks.Open "C:\test.xls"
       
        Set objActiveWkb = .Application.ActiveWorkbook
       
        With objActiveWkb
           
            For iRow = 1 To 3
                For iCol = 1 To 3
                    Debug.Print .Worksheets("Sheet1").Cells(iRow, iCol)
                       
                Next iCol
            Next iRow
        End With
       
        .Application.Quit
   
    End With
   
    Set objXL = Nothing
    Set objActiveWkb = Nothing
   

End Function

Hej
gider du lave et eksempel i vb6 jeg kan kigge på.
mvh/HC

Det jeg gerne ville, er at jeg i en MSFlexGrid får vist indholdet af et excel ark
Mvh/hc

Sorry, I dont have VB installed.

Er der nogen der har et bud, og tid.

Tjaa jeg kommer vis ikke vidre, tak for hjælpen terry
mvh/HC

selv tak

Cant you find any examples on how you load data into FlexGrid on the internet?

jo jeg er nærmer, men jeg vil gerne at den altid åbner et bestemt ark, der har jeg problemet.
Mvh/HC

This line of code takes the data from sheet1 (ark), just replace sheet1 with the ark you want to take the data from.

Debug.Print .Worksheets("Sheet1").Cells(iRow, iCol)