letztes Tabellenblatt finden

[computerhellef24]

Hallo, ich mal wieder mit einer neuen Herausforderung...

Nachdem Google keine Ergebnisse gebracht frag ich doch mal die Profis hier.

Wie kann ich in VB6 (nicht VBA) den Tabellennamen des letzten Tabellenblattes finden.
Verbunden ist die Tabelle via ADO

Danke im Voraus...

 

[Alex F.]

ich weiss leider nicht wie du die Verbindung herstellst aber ich gehe mal davon aus das du auf ein Excel dokument zugreifen willst

in diesem Fall würde ich mir ein Excel.Objekt erstellen und darüber dann auf die Worksheets zugreifen also so ungefähr

Dim xls as Object 
dim wkb as object
dim sht as object

set xls =  CreateObject("Excel.Application")
        
    Set wbk = xls.Workbooks.Open("c:\test.xls")
    
    msgbox wbk.Sheets(wbk.Sheets.Count).Name

Grüsse BB

 

[computerhellef24]

Werd ich doch morgen mal ausprobieren, danke für die Hilfe...