Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
532to536
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
532to536
532to536
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Daten aus anderen XLS Dateien auslesen

Daten aus anderen XLS Dateien auslesen
13.12.2004 14:56:31
Thorsten
Hi @ all,
Wie kann ich Daten, die sagen wir in Daten.xls gespeichert sind mittels VBA auslesen?
ICh dachte da so ungefähr an:
File("DAten.xls").Sheets("Daten").Range("a1").Value
Wobei mir der befehl für File("Daten.xls") fehlt.
ICh habe es folgendermaßen geschafft:
Dim i As Integer
For i = 1 To 100
Range("A" & i).Value = "=[daten.xls]Daten!$A$" & i
Range("B" & i).Value = "=[daten.xls]Daten!$b$" & i
Next i
Aber das ist nicht ganz das was ich errreichen wollte.
Kann mir jemand helfen, oder, geht das überhaupt?
Danke
Greetz
Thorsten

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten aus anderen XLS Dateien auslesen
Beni
Hallo Thorsten,
Gruss Beni

Sub Daten_aus_ungeöffneter_Datei()
Dim sFile, sPath As String
sFile = "Daten.xls"
sPath = ThisWorkbook.Path & "\"
For i = 1 To 10
Cells(i, 1).Formula = "='" & sPath & "[" & sFile & "]Daten'!A" & i
Cells(i, 1).Copy
Cells(i, 1).PasteSpecial Paste:=xlPasteValues
Cells(i, 2).Formula = "='" & sPath & "[" & sFile & "]Daten'!B" & i
Cells(i, 2).Copy
Cells(i, 2).PasteSpecial Paste:=xlPasteValues
Next i
End Sub

AW: Daten aus anderen XLS Dateien auslesen
Thorsten
Hey super Danke!!
Das Klappt prima!!!
Anzeige

329 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige