Print Preview of Excel worksheet in VB codes

I was coding in VB, required to show a PRINT PREVIEW of an EXCEL worksheet , WITHOUT USERS ABLE TO CHANGE THE CONTENTS OF THE PREVIEW WORKSHEET, JUST LIKE MS OFFICE PRINT PREVIEW. How should I go about doing it? Without USING EXCEL OBJECTS. Thanks!
sunburntAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
Ryan ChongConnect With a Mentor Commented:
Hi sunburnt,

This should solve your problem:

Private Sub Command1_Click()
    Dim iExcel As Excel.Application
    Dim iWBook As Workbook
    Dim iWSheet As Worksheet
    TempDBPath = "D:\Project\Icon\develop\DO.xls"
    Set iExcel = CreateObject("excel.application")
    iExcel.Visible = True
    Set iWBook = iExcel.Application.Workbooks.Open(TempDBPath)
    Set iWSheet = iWBook.Worksheets("gr")
    iWSheet.PrintPreview False
    'Set iWSheet = Nothing
    'iWBook.Close True
    'Set iWBook = Nothing
    'iExcel.Quit
    'Set iExcel = Nothing
End Sub

Cheers,
ryancys
0
 
Ryan ChongCommented:
Ohya, make sure to add the M$ Excel 9.0 Object Library from References.
0
 
Ryan ChongCommented:
> Without USING EXCEL OBJECTS
Sorry, Excel Object is required here..
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.