Hey Leute!
Ich muss auf der Arbeit tdms-Dateien, die Messwerte enthalten, in Excel öffnen und per VBA Makro verarbeiten.
Will man diese manuell öffnen so nutze ich den Excel Importer, der das Ganze auch korrekt darstellt. Dies möchte
ich aber nun per Makro machen, da es ca. 5.000 Dateien sind! Bisher habe ich nur txt- Dateien geöffnet und
verarbeitet, wobei ich folgenden Code verwendet habe.
Open "" & pfad & datei For Input As #1
Do While Not EOF(1)
Line Input #1, temp
Cells(x, 1) = Replace(temp, vbTab, ";")
x = x + 1
Loop
Close #1
For j = 1 To x
Text = Split(Cells(j, 1), ";")
For i = 0 To UBound(Text)
Cells(j, i + 1) = Text(i)
Next
Next
Leider kann ich keine andere Software erhalten, sodass ich es wirklich per Excel VBA machen muss!
Ich hoffe ihr habt vielleicht einen Tipp...
Grüße
AaronP91