mehrdimensionales bzw. geschachteltes Array

[deusfalsus]

Hallo zusammen!

Ich möchte Daten einer Excel-Tabelle auslesen und in mehrere Dateien schreiben.
Der Dateiname wird dem Spaltentitel entsprechen (plus ".ini").
In den ini-Dateien sollen Parameter mit jeweiligem Wert stehen.

Ich dachte, ich kann die Paramter und die Werte zusammen in ein Array packen:

Private Type ini_Eintrag
    Parameter As String
    Wert As String
End Type

und die PCs mit ihren gesammelten ini-Werten in ein Array drumrum:

Private Type PC
    Name As String
    ini As ini_Eintrag
End Type

Ich laufe dann in einer äußeren Schleife die Spalten durch und in der inneren die Zeilen

Dim Zeile As Integer
Dim Spalte As Integer

Dim PC_array() As PC
ReDim PC_array(0)

Spalte = 1



For Spalte = 2 To 50
    ReDim Preserve PC_array(UBound(PC_array) + 1)
    PC_array(UBound(PC_array)).Name = Cells(1, Spalte).Value
    
    For Zeile = 2 To 100
        
        PC_array(UBound(PC_array)).ini(Zeile - 1).Parameter = Cells(Zeile, 1).Value
        PC_array(UBound(PC_array)).ini(Zeile - 1).Wert = Cells(Zeile, Spalte).Value
    
    Next
    
Next

Aber ich kann dem PC array keine Werte für den ini_eintrag zuweisen

und irgendwie hab ich jetzt einen Hirnkrampf und weiß nicht weiter.
Ich geh erstmal einen Kaffee trinken und wäre über jedwede Hilfe erfreut.