Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1008to1012
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
Inhaltsverzeichnis

Editor mit vba auslesen

Editor mit vba auslesen
17.09.2008 16:39:49
Jan
Werte Excelfreunde,
ich möchte folgendes Problem per vba lösen:
- Öffnen einer "2008-09-17_Test.csv" über Editor aus der geöffneten Exceldatei
(der Dateiaufruf erfogt täglich, jeden Tag ist die csv mit dem aktuellen Datum versehen)
- Kopieren des gesamten Editorinhaltes
- Einfügen in die geöffnete Exceldatei
- Schließen des Editors bzw. der csv
Irgendwann hatte ich dies schon mal getan, aber ich komme heute einfach nicht weiter.
Vielleicht kann mir jemand helfen.
Vielen Dank im voraus - Jan

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Editor mit vba auslesen
17.09.2008 17:10:00
Rudi
Hallo,
den Editor brauchst du nicht.
Prinzipiell kannst du das mit der OpenText-Methode machen.
Ich bevorzuge allerdings diese:

Sub lesen()
Dim strTxt As String, arrTxt
Open "c:\meinedatei.csv" For Input As #1
Do While Not EOF(1)
Line Input #1, strTxt
arrTxt = Split(strTxt, ";")
With Sheets(1)
.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Resize(1, UBound(arrTxt) + 1) = arrTxt
End With
Loop
Close 1
End Sub


Gruß
Rudi

AW: Editor mit vba auslesen
17.09.2008 17:23:00
Jan
Hallo Rudi,
danke für die schnelle Reaktion.
Mein Problem bei der vorgeschlagenen Lösung ist dann folgendes:
In der csv stehen z.B. 24 Werte in einer Zeile (getrennt durch Leerzeichen) und diese 24 Werte müssen im Excel jeweils in einer Zelle stehen (also 1 Wert in jeweils einer Zelle).
Mit Deinem Vorschlag stehen alle in einer Zelle - leider.
Deswegen dachte ich erst über Editor sprich Notepad zu gehen - wenn ich dies manuell kopiere und in Excel einfüge dann klappt es.
Noch eine Idee dazu ?
Viele Grüße - Jan
Anzeige
AW: Editor mit vba auslesen
17.09.2008 17:25:00
Rudi
Hallo,
das Trennzeichen in der Split-Funktion muss angepasst werden.
arrTxt = Split(strTxt, " ")
Gruß
Rudi
AW: Editor mit vba auslesen
17.09.2008 17:40:28
Jan
Hallo Rudi,
habe es jetzt kapiert - Danke.
Mit dem Trennzeichen gibt es noch Probleme - kopiert trotzdem alles in eine Zeile, aber ich probiers weiter.
Danke nochmal - Jan
AW: Editor mit vba auslesen
17.09.2008 18:56:00
Jan
Nerv ! - Hallo Rudi,
habe es endlich und funktioniert.
Hast Du noch einen letzten Tipp, wie ich die Daten erst ab Zelle "D10" einfüge ?
Schönen Abend noch - Jan

18 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige