Alle Zeilen einer Excel Tabelle als Textdateien speichern

Hallo
Habe folgendes Problem und komme wegen fehlender Kenntnis nicht weiter.

Ich habe eine Excel Datei mit einer Tabelle.
In der Tabelle befinden sind ca. 60 Spalten und ca. 3.500 Zeilen.
In der Regel haben alle Zellen Inhalt,- es kann aber auch ein paar leere Zellen geben.

Ich möchte nun für jede Zeile in der Tabelle eine eigene Textdatei erstellen.
Der Name der Textdatei soll sich jeweils aus den Einträgen der Spalte A bilden (die nie leer ist).
Die jeweiligen Spalten in einer Zeile sollen in der Textdatei mit einem Zeilenumbruch untereinander stehen.

Ich habe ähnliche Beiträge hier im Forum schon gelesen und die dort angebotenen Lösungen auch versucht für mich anzupassen, - es will aber nicht funktionieren.
Mir fehlen einfach die nötigen Kenntnisse.

Hoffe auf Hilfe.
Vielen Dank und viele Grüße

$data = import-csv datei.csv -delimiter ";" -encoding utf8 # Der Delimiter muss mit dem übereinstimmen, was die Daten im Datensatz trennt.  

foreach( $dataset in $data) {

out-file $dataset.spalteA -inputObject $($dataset.spalteB + "`n" + $dataset.spalteC +"`n" + $dataset.spalteD ... )  

}

Sub Export()
    Const MEINORDNER = "d:\Daten"  
    Set fso = CreateObject("Scripting.FilesystemObject")  
    With ActiveSheet
        for each cell in .Range("A2:A" & .Cells(Rows.Count,"A").End(xlUp).Row)  
            strData = ""  
            for each col in cell.Offset(0,1).Resize(1,60)
                If col.Value <> "" then strData = strData & col.Value & vbNewline  
            Next
            fso.OpenTextfile(MEINORDNER & "\" & cell.Value & ".txt",2, True).WriteLine strData  
        Next
    End with
End Sub