Hallo,
ich habe eine txt datei in folgendem format:
23.45,46.51
24.53,47.64
usw.
die Aufgabe ist, diese Werte einzulesen und anhand einer vorherigen Abfrage nur die 2, 3 oder 4te Zeile in eine Arbeitsmappe zu schreiben.
Mein Code sieht bisher folgendermaßen aus:
Dim Datei, Zeilen As String
Dim n, z As Integer
Dim x, y As Single
Datei = "C:\Temp\Messwerte.txt"
n = FreeFile
Open Datei For Input As #n
z = 0
While Not EOF(n)
Input #n, x, y
z = z + 1
Cells(2 + z, 2) = x
Cells(2 + z, 3) = y
Wend
Close #z
Wie kann ich das machen?
Als VBA Anfänger komme ich da nicht weiter.
Frank