Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Muhtar99 am November 09, 2010, 16:51:41

Titel: Letzte Zeile aus Excel 2007 mit Access VBA auslesen
Beitrag von: Muhtar99 am November 09, 2010, 16:51:41
Ich möchte aus einer TAbelle in Excel die anzahl (max. Zeile) auslesen

dim ws as object
.
.
.

ws.Sheets(1).Cells(ws.Sheets(1).Rows.Count, 1).End(xlUp).Row

funkt nicht

wie kann ich es schnell auslesen( Excel und Access version 2007)


Besten Dank im Voraus
Titel: Re: Letzte Zeile aus Excel 2007 mit Access VBA auslesen
Beitrag von: DF6GL am November 09, 2010, 17:09:07
Hallo,

und was soll man bei diesem Codefragment denn sagen können?

WAS "funkt" nicht??


Was bedeutet "schnell" ?
Titel: Re: Letzte Zeile aus Excel 2007 mit Access VBA auslesen
Beitrag von: Muhtar99 am November 09, 2010, 17:34:55
Hallo,


dies der code unter access


Option Compare Database
Dim ws As Object
Dim xlWB As Object
Dim anzahl As Long


Sub exportexcel()
    Set ws = CreateObject("Excel.Application")
    Set xlWB = ws.workbooks.Open("U:\Eigene Dateien\Aufgabengebiete\Provisionenkommunikation\201001 Provisionenkommunikation FH Januar_v3.xlsx", , , , "")
    ws.worksheets(1).Activate

    Debug.Print ws.Sheets(1).Cells(ws.Sheets(1).Rows.Count, 1).End(xlUp).Row
   
   


bei dubug.print kommt laufzeitfehler 1004 (Anwendungs- oder objektdefinierter Fehler



Also ich kann in Excel die Anzahl der Zeile (in Spalte A ) nicht ermitteln.


Schnell bedeutet, so schnell wie möglich  ;)


Danke im Voraus
Titel: Re: Letzte Zeile aus Excel 2007 mit Access VBA auslesen
Beitrag von: DF6GL am November 09, 2010, 17:49:48
Hallo,


ersetz mal ws durch xlWB bei debug.print