Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
480to484
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
480to484
480to484
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textimport to excel (HILFE !!!)

Textimport to excel (HILFE !!!)
13.09.2004 11:11:15
Mahdia
Hallo Leute,
Ich bin Anfänger bei VBA und Excel :-)
Ich muss ein Makro schreiben, der ein Textdatei öffnet. Sie sieht so aus:
------------------------------------------------
Städte = Frankfurt, München, Berlin, Hannover
Autos = BMW, VW, Audi, Mercedes, Ferrari
...
----------------------------------------------
Also, jede Zeile beinhaltet eine Gruppe und deren Elemente. Diese muss ich schließlich in einer Tabelle umwandeln, die so aussehen muss:
https://www.herber.de/bbs/user/10828.xls
Ich danke euch für die Hilfe im Voraus :-)

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textimport to excel (HILFE !!!)
13.09.2004 12:15:22
tobias
Hallo
grundsätzlich geht das so:
ComboOrdner1 = ThisWorkbook.Path & "\System\Kostenstelle.txt"
Open ComboOrdner1 For Input As #1
Do While Not EOF(1)
Input #1, APlatz, KStelle, EMail
Feld(1) = APlatz
Feld(2) = KStelle
Feld(3) = EMail
Loop
Close #1
die Einträge in der Kostenstelle.txt sahen dabei so aus:
"APlatz","KStelle","EMail"
musst du jetzt halt mal ausprobieren...
mfg Tobias
AW: Textimport to excel (HILFE !!!)
13.09.2004 13:05:39
Mahdia
Hallo,
Leider hat mir dieses Beispiel nicht weiter geholfen.was ist Feld?
kannst du mir sagen wie dein Code funktioniert?
mfg
Anzeige
AW: Textimport to excel (HILFE !!!)
tobias
Hallo
Feld() ist ein Array, brauchst du aber nicht. Das war nur ein Beispiel.
Du müstest mal ausprobieren mit Input #1, DeineVariable
Steht dein Text in der txt-Datei mit oder ohne ""?
tobias
PS:Ich kann es eben auf der Arbeit nicht selber testen.
AW: Textimport to excel (HILFE !!!)
13.09.2004 13:18:40
Mahdia
In Txtdatei steht der Text ohne "".
Ich werde es nochmal versuchen. Ich danke dir für Hilfe.
mfg

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige