MSFlexGrid to .prn

Здравейте!
Това е код който пише стойностите от FlexGrid във текстов файл. обаче за да го разпечатам трябва да се форматира по колони. Може ли някой да помогне?

Private Sub Save_FlexGrid_TO_FILE()
Dim strFieldSeparator
Dim i
Dim j
strFieldSeparator = ";"


Open "C:\Testfile.txt" For Output As #1


For i = 0 To MSFlexGrid1.Rows - 1
For j = 0 To MSFlexGrid1.Cols - 1
Write #1, MSFlexGrid1.TextMatrix(i, j)
Next j
Write #1,
Next i


Close
End Sub

Това трябва да свърши работа:

Write #1, MSFlexGrid1.TextMatrix(i, j) & vbTab