Aus Exceldatei eine Ordnerstruktur mit PowerShell erstellen

Hallo liebes Administratorforum!

Ich habe in der Arbeit folgendes Problem und benötige Eure Hilfe.
In einem Excelfile stehen in den einzelnen Zellen Wörter drinnen und aus diesen Wörtern soll ein Pfad erstellt werden.

z.B

Zelle A1: Hallo
Zelle B2: wie
Zelle C3: gehts
Zelle D4: dir

Zelle A100: Mir
Zelle B101: gehts
Zelle C102: gut


Der Pfad müsste dann wie folgt aussehen: C:\temp\hallo\wie\gehts\dir bzw C:\temp\Mir\gehts\gut

Das ganze geht aber auf 10359 Zeilen und auf 13 Spalten. Also hier ist eine recht gewaltige und komplexe Ordnerstruktur.

Ich habe die Exceldatei in PowerShell eingebunden, und dachte mir dass ich es mit einer verschachtelten Schleife hinbekomme, doch leider klappt das ganze nicht so einfach.

Diese Struktur wurde aus einer bestehenden abgekupfert, nur wurden hier einzelne Ordner ausgelassen.
Was auch noch zu beachten ist, dass nur die Ordnerinhalte (Files) der letzten Ordner in der Struktur mitkopiert werden dürfen.

Bsp.:

Zelle A1: Auto
Zelle B2: BMW
Zelle B3: AUDI
Zelle B4: VW
Zelle C5: Tiguan

Pfadaufbau wäre wie folgt:

C:\Temp\Auto\BMW\bmwauto.txt
C:\Temp\Auto\AUDI\audiauto.pdf
C:\Temo\Auto\VW\hallo.pdf
C:\Temp\Auto\VW\Tiguan\abc.txt

Jetzt dürfen nur die Inhalte, also Files (*.pdf, *.txt, *....), von BMW, AUDI und Tiguan, aber nicht von VW selbst mitgenommen werden, da diese Ordner die letzten Ordner in der Ordnerstruktur sind.

Doch bevor man hier auch schon die Files kopiert, wäre es schön, wenn man die Ordnerstruktur aus der Excelliste anlegen kann.

Ich hoffe, dass ich es anschaulich genug erklärt habe.

LG
Rikkijooe

# Quelldatei
$quelle = 'D:\autos.xlsx'  
# Ordner in dem die Unterordner erstellt werden
$rootPath = 'D:\Autos'  
# Excel COM-Objekt erstellen
$objExcel = New-Object -Com Excel.Application
# Mappe öffnen
$wb = $objExcel.Workbooks.Open($quelle)
# Excel verbergen (oder anzeigen mit $true)
$objExcel.Visible = $false
$objExcel.DisplayAlerts = $false
# Ordner erstellen indem alle benutzen Zeilen des Sheets genommen werden und die nicht leeren Spalten dieser mit "\" zusammengefügt werden und mit dem RootPath verheiratet werden. 
$wb.Sheets.Item(1).UsedRange.Rows | %{md "$rootPath\$(($_.Cells.Value() | ?{$_ -ne $null}) -join '\')" -Force -Verbose | out-null}  
# Dokument schließen
$wb.Close($false) | out-null
$objExcel.DisplayAlerts = $true
# Excel schließen
$objExcel.Quit() | out-null
# Ressourcen freigeben
[void][System.Runtime.InteropServices.Marshal]::ReleaseComObject($objExcel)