VB.Net 2008 Save Print Preview DataGridView inside txt file or Excel

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • remya1000
    New Member
    • Apr 2007
    • 115

    VB.Net 2008 Save Print Preview DataGridView inside txt file or Excel

    I’m using VB.Net 2008 application program.

    I’m using DataGridView. I have a Print Preview option where i need to print the DataGridView.

    Using "DataGridView1. Rows.Add" i’m adding rows to datagridview.
    I’m using this code for Print Preview.

    Code:
    Dim MyDataGridViewPrinter As DataGridViewPrinter
    
    
        Private Function SetupThePrinting() As Boolean
            Dim MyPrintDialog As PrintDialog = New PrintDialog()
    
            MyPrintDialog.AllowCurrentPage = False
            MyPrintDialog.AllowPrintToFile = False
            MyPrintDialog.AllowSelection = False
            MyPrintDialog.AllowSomePages = True
            MyPrintDialog.PrintToFile = False
            MyPrintDialog.ShowHelp = False
            MyPrintDialog.ShowNetwork = False
    
            PrintDocument1.PrinterSettings = MyPrintDialog.PrinterSettings
            PrintDocument1.DefaultPageSettings.Margins = New Margins(10, 10, 10, 10)
    
            MyDataGridViewPrinter = New DataGridViewPrinter(DataGridView1, PrintDocument1, False, True, "Manager", New Font("Tahoma", 18, FontStyle.Bold, GraphicsUnit.Point), Color.Black, True)
            
            Return True
        End Function
    
        Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
            Dim more As Boolean
    
            more = MyDataGridViewPrinter.DrawDataGridView(e.Graphics)
            If more Then e.HasMorePages = True
        End Sub
    
    
        ' The Print Preview Button
        Private Sub btnPrintPreview_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrintPreview.Click
            If SetupThePrinting() Then
                Dim MyPrintPreviewDialog As PrintPreviewDialog = New PrintPreviewDialog()
                MyPrintPreviewDialog.Document = PrintDocument1
                MyPrintPreviewDialog.ShowDialog()
            End If
        End Sub
    I searched a lot, but I couldn’t find it.

    If you know how i can Save Print Preview inside text file or Excel, please help me. If you can provide an example, that will be so helpful.

    Thanks in advance.
Working...