Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: AaronP91 am Juni 18, 2015, 15:39:48 Nachmittag

Titel: TDMS- Datei importieren
Beitrag von: AaronP91 am Juni 18, 2015, 15:39:48 Nachmittag
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