ok ci provo:

codice:
Dim tuoArray() As String

tuoFile = "percorso assoluto del tuo file"
Open tuoFile For Input As #1
While Not (EOF(1))
    i = i + 1
    ReDim Preserve tuoArray(i)
    
    Input #1, tuoArray(i - 1)
Wend
Close #1
tuaFlex.Rows = UBound(tuoArray)

For i = 1 To tuaFlex.Rows
    tuaFlex.TextMatrix(i - 1, 1) = tuoArray(UBound(tuoArray) - i)
Next i
Questo codice deovrebbe funzionare provalo e sappimi dire!!
Ciauz ciauz