Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Excel Datein in ein Flexgrid einfügen
Autor: fin
Datum: 16.01.08 17:04
hallo francesco, ich habe dein Problem für mich so gelöst: On Error GoTo fehler Dim i, j As Integer Dim excelx As Variant' verweis auf Excel setzen Set excelx = GetObject(, "Excel.Application") excelx.Workbooks.Open MEINEDATEI excelx.Visible = False excelx.WindowState = vbNormalFocus excelx.ActiveWorkbook.Sheets(1).Select excelx.ActiveWorkbook.ActiveSheet.Cells(1, 1).Select 'beispiel 4 Spalten/6Zeilen Exceltabelle Sheets(1) With MSFlexGrid1 .Rows = 7 .Cols = 5 For i = 1 To 6 For j = 1 To 4 .TextMatrix(i, j) = excelx.ActiveWorkbook.ActiveSheet.Cells(i, j).Value Next j Next i End With MsgBox "ok" Set excelx = Nothing fehler: If Err.Number > 0 Then MsgBox Err.Description Resume Next 'bei fehler Excelinstanz beenden, sonst bleibt sie im taskmanager und blockiert Set excelx = Nothing End If vielleicht kannst du es für dich passend umbauen: viel erfolg gruß fin

Excel Datein in ein Flexgrid einfügen	978	Francesco	15.01.08 16:09
Re: Excel Datein in ein Flexgrid einfügen	617	fin	16.01.08 17:04
Re: Excel Datein in ein Flexgrid einfügen	601	Francesco	17.01.08 13:47
Re: Excel Datein in ein Flexgrid einfügen	553	fin	17.01.08 16:28
Re: Excel Datein in ein Flexgrid einfügen	527	Francesco	17.01.08 16:30
Re: Excel Datein in ein Flexgrid einfügen	545	Zardoz	17.01.08 23:48

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen