Perci, segue abaixo o código da importação do arquivo texto pra dentro do Grid, assim como um screenshoot do projeto para vc poder analisar melhor...
http://img399.imageshack.us/my.php?image=screencu2.jpg

Private Sub Command1_Click()
Dim myFile As String
Dim arAllLines() As String
Dim fileNum As Integer
Dim i As Integer

On Error GoTo ErrHandler
    With CommonDialog1
       .CancelError = True
       .Filter = "Text Files|*.txt"
       .FileName = ""
       .ShowOpen
        myFile = .FileName
    End With
   
    If myFile = "" Then Exit Sub
       
    fileNum = FreeFile()
    Open myFile For Input As #fileNum
        arAllLines() = Split(Input(LOF(fileNum), #fileNum), vbNewLine)
    Close #fileNum
   
    With MSFlexGrid1
         .Redraw = False ' opção desabilitada para aumentar o desempenho da importação
        
        For i = 0 To UBound(arAllLines)
            If Not Trim(arAllLines(i)) = "" Then
                .TextMatrix(i + 1, 0) = i + 1
                .TextMatrix(i + 1, 1) = arAllLines(i)
                .Rows = MSFlexGrid1.Rows + 1
            End If
        Next i
       
        .Redraw = True
       
    End With
       
    Exit Sub
ErrHandler:
'------------
    Debug.Print Err.Description
    Err.Clear
    Exit Sub
   
End Sub