[AYUDA] Guardar Variables desde una variable con saltos de linea

[ErCaZa]

Ya esta ya lo solucione:

Dim Index As Integer
Dim a() As String
Dim Valores() As String
a = Split(Archivo2, vbNewLine)
Index = a.Length - 1
MsgBox("Total de lienas: " & Index & vbNewLine & a(1))
Dim i As Integer
For i = 0 To Index
Valores = Split(a(i), ",")
MsgBox("Nombre: " & Valores(0) & vbNewLine & "Descripcion: " & Valores(1))
Next

no se si sera la mejor forma pero hace lo que yo queria :P