Thomas Büttner: Visual Basic

Beitrag lesen

Hallo ihr guten Geister,
Ich habe ein nicht geringes Problem mit Visual Basic. Leider ist dies das einzige Forum, das ich kenne. Ich werde frecherweise diese VB-Frage einfach hier stellen, wäre aber dankbar, wenn mir jemand ein ähnlich gutes Forum wie dieses hier nennen könnte, in dem es aber um VB geht.

Trotzdem, hier mein Problem:
Ich möchte mit Visual Basic auf eine Excel-Tabelle zugreifen, und diese dann auch mit movenext, movelast, movefirst, usw. bearbeiten können. Laut Online-Hilfe geht das folgendermaßen:

Dim dbs As Database
     Dim rstSales As Recordset
     Dim qdfNumOrders As QueryDef
     Dim intNumRecords As Integer

Set dbs = OpenDatabase(frmKonvertierung.txtQuelle.Text, False, False, _
     "Excel 5.0;HDR=YES;")
  
     Set rstSales = dbs.OpenRecordset("Einsatzberichte EW$")

rstSales.MoveLast
     intNumRecords = rstSales.RecordCount
     MsgBox "Diese Tabelle enthält " & intNumRecords & " Zeilen."
     rstSales.Close

frmKonvertierung.txtQuelle.Text enthält den Pfad und Dateinamen meiner Tabelle, Einsatzberichte EW ist der Name des Tabellenblatts und das $ soll laut VB Online-Hilfe angegeben werden.

Wäre echt toll, wenn hier jemand weiterwüßte.

Gruß aus Bremen,
Thomas Büttner