Use Format function to make it right aligned.
Also change textbox font to Courier New.
Private Sub Command1_Click()
Dim GRN As Integer
For GRN = 1 To .Rows - 1
Text6.Text = Text6.Text & vbCrLf & .TextMatrix(GRN, 0) & vbTab & _
Format$(Format$(.TextMatrix(GRN, 2), "##0.00"), "@@@@@@@@@@@@@")
You make this thread Unsolved and you ask the different question now..
Please keep the originally question of this thread about how to transfer data from flexgrid.
Also, you already have a new thread about your question.