VB.NET

How do I PrintPrintPreview an Excel File?

Please support our VB.NET advertiser: Programming Forums - DaniWeb Sister Site

•

Join Date: Aug 2009

Posts: 94

Reputation: yorro has a little shameless behaviour in the past

Solved Threads: 6

yorro

Offline

Junior Poster in Training

How do I PrintPrintPreview an Excel File?

Oct 24th, 2009

How do I Load an excel file to the PrintPreviewDialog?

 Help with Code Tags 
 vb Syntax (Toggle Plain Text) 
 
Imports Excel = Microsoft.Office.Interop.Excel
    Private Sub btnPrintPreview_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrintPreview.Click
        Dim xlApp As Excel.Application
        Dim xlWorkBook As Excel.Workbook
 
 
        xlApp = New Excel.ApplicationClass
        xlWorkBook = xlApp.Workbooks.Open(Application.StartupPath & "report_summary.xlsx")
 
        MyPrintPreviewDialog.Document = xlWorkBook
        If MyPrintPreviewDialog.ShowDialog() = DialogResult.OK Then
            xlWorkBook.Close()
            xlApp.Quit()
        End If
    End Sub
Imports Excel = Microsoft.Office.Interop.Excel
    Private Sub btnPrintPreview_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrintPreview.Click
        Dim xlApp As Excel.Application
        Dim xlWorkBook As Excel.Workbook


        xlApp = New Excel.ApplicationClass
        xlWorkBook = xlApp.Workbooks.Open(Application.StartupPath & "report_summary.xlsx")

        MyPrintPreviewDialog.Document = xlWorkBook
        If MyPrintPreviewDialog.ShowDialog() = DialogResult.OK Then
            xlWorkBook.Close()
            xlApp.Quit()
        End If
    End Sub

Error states that excel cannot be converted to .Document.

•