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

Textdatei in mehrspaltige Listbox

Textdatei in mehrspaltige Listbox
25.02.2005 12:41:55
Manfred
Wie kann ich aus einer Textdatei, die wie folgt aufgebaut ist
5100/5000/2000,2000,100
5200/4000/2010,2020,275
.....
die Werte in eine mehrspaltige Listbox einlesen, so daß
in der ersten Spalte 5100/5000/2000
in der zweiten Spalte 2000
in der dritten Spalte 100
steht?
Hat jemand einen Rat.

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

Betreff
Datum
Anwender
Anzeige
AW: Textdatei in mehrspaltige Listbox
Bernd
Hallo Manfred,
vielleicht hilft die DATEN / TEXT IN SPALTEN da weiter.
Du kannst hier das Komma als Trenner eingeben.
Gruß
Bernd
Mein Lösungansatz
25.02.2005 15:47:04
Manfred
bei dem folgenden Code wird nur die letzte Zeile aus der Textdatei eingelesen.
Was muß ich ändern damit alle Zeilen eingelesen werden?

Private Sub CommandButton2_Click()
Dim zeile As String
Dim Text1 As String
Dim Text2 As String
Dim Text3 As String
Dim arr(0 To 0, 0 To 2) As String
Open "D:\Altakten\Etiketten1.txt" For Input As #1
Do While Not EOF(1)
Input #1, Text1, Text2, Text3
arr(0, 0) = Text1
arr(0, 1) = Text2
arr(0, 2) = Text3
ListBox1.List() = arr
Loop
Close #1
End Sub

Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige