Print grid similar Excel

[luca90]

I use this code to print the value from msflexgrid.

I need to print the value of grid with a border grid similar Excel

Possible?

Private Sub STAMPA_PATOLOGIE()

    R = 1
    
    Printer.Font = "Consolas"
    Printer.Font.Size = 8

    Printer.Print vbCrLf & vbCrLf

    Printer.Print "ELENCO PATOLOGIE" & vbCrLf & vbCrLf

    With MSFlexGrid1
        DoEvents
        For I = 0 To Me.LNP.Caption - 1
            Printer.Print .TextMatrix(R + I, 0) & "-" & .TextMatrix(R + I, 1)
        Next I
        Printer.EndDoc
    End With

    Me.Text1.SetFocus

End Sub

[Arnoutdv]

Maybe this old thread can be of any help
https://www.vbforums.com/showthread....exGrid-Control