Anzeige
Archiv - Navigation
204to208
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
204to208
204to208
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Daten import sehr langsam

Daten import sehr langsam
18.01.2003 23:28:06
Daniel
Hallo ..

Ich lese aus einer Texdatei Daten mit folgenden Code aus .
Sub Daten2()
Dim iRow As Integer, iCol As Integer
Dim sFile As String, sTxt As String
Dim endee As String
sFile = Range("P16").Value
If Dir(sFile) = "" Then
Beep
MsgBox "Datei wurde nicht gefunden!"
Exit Sub
End If
iRow = 1
iCol = 2
Close
Open sFile For Input As #1
Do Until EOF(1)
Line Input #1, sTxt
Do While InStr(sTxt, ";")
Cells(iRow, iCol).Value = Left(sTxt, InStr(sTxt, ";") - 1)
sTxt = Right(sTxt, Len(sTxt) - InStr(sTxt, ";"))
iCol = iCol + 1
Loop
Cells(iRow, iCol).Value = sTxt
iRow = iRow + 1
iCol = 2

Loop
Close
End Sub


Das funktioniert so weit ganz gut (in einer leeren tabelle)
geht das auch schnell .

Um die Daten weiter zu verarbeiten lasse ich sie mir
dann per Makro kopieren(alles aber nach dem Dateiimport)


Nur irgentwie wird der Dateimport immer langsamer
manchmal stürzt Exel sogar ab!

Wer kann mir helfen

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

Betreff
Datum
Anwender
Anzeige
Re: Daten import sehr langsam
19.01.2003 02:12:33
Nike
Hi,
ich würde versuchen die Datei mit
Workbooks.Open sFile
zu öffnen und dann die Werte in der Datei mit "Bordmitteln"
in dieser Datei zu verändern um dann die fertigen Daten
per Copy paste in deine Zielmappe zu kopieren...

Bye

Nike

Re: Daten import sehr langsam
19.01.2003 12:49:02
Daniel
Hallo Nike

kannst Du mir ein Beispiel geben .
Ich bin ein Neuling ..

Gruß Daniel

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige