Tabellenblatt aus geschlossener Datei auslesen (VBA-Lösung gesucht)

[bodowitt]

Perfekt. Hat funktioniert :)

Hat jemand zufällig noch eine Lösung für folgendes Problem (VBA):

Ich möchte per Klick auf einen Button eine bestimmtes Tabellenblatt bzw. eine bestimmte Datei einlesen lassen. Diese liegt entweder im Format .csv oder als Excel Tabellenblatt vor. Es soll einfach diese Tabelle in die aktuelle Arbeitsmappe (z.B. in das Tabellenblatt "test") eingefügt werden, ohne dass die Datei öffen sein muss (mit offener Datei habe ich bereits eine Lösung).

Danke :)

[Rabe]

Hi,

Es soll einfach diese Tabelle in die aktuelle Arbeitsmappe (z.B. in das Tabellenblatt "test") eingefügt werden, ohne dass die Datei öffen sein muss (mit offener Datei habe ich bereits eine Lösung).

per VBA:
xls-Datei verborgen öffnen, Daten rüberkopieren, Datei wieder schließen.

Sieht aus, als ob sie nicht geöffnet wäre.

csv-Datei:
muß da nicht auch noch u.a. das Format der Spalten bestimmt werden (Datum/Text/Zahl), also auf jeden Fall die Datei erst mal geöffnet werden?

[bodowitt]

Hallo,

danke schonmal für deine Idee. Ich habe bislang folgenden Code:

Code:

Workbooks.Open Filename:=TextBox7.Text

ActiveWorkbook.Worksheets("Daten").Range("A1:AB65000").Copy
Workbooks("zieldatei.xlsm").Sheets("dump").Range("A1:AB65000").PasteSpecial Paste:=xlPasteValues
Workbooks("zieldatei.xlsm").Sheets("dump").Range("A1:AB65000").PasteSpecial Paste:=xlPasteFormats
Application.CutCopyMode = False

Wie schaffe ich es jetzt die Datei verborgen zu öffnen bzw. dass für das Kopieren sich keine Datei öffnet?

[bodowitt]

ok habs!

[schauan]

Hallo Bodo,

hier mal als Ergänzung ein Link, wie man Daten aus geschlossenen Excel- und csv-(Text)-Dateien auslesen kann.

http://www.online-excel.de/excel/grusel_vba.php?f=2

Relevant sind die Tutorials ADO 1-9

Im Gegensatz zu anderen Lösungen mit Formeln oder Excel4Makros bekommt man hier den Zugriff auf größere Bereiche.