用VB能实现EXCEL里面内容的打印预览吗？

Question

各位大虾。本人要打印几十种不同类型的报表。利用VB与EXCEL来实现。也就是说，通过VB打印到EXCEL的模版上(自己原先设好)。然后再调用EXCEL打印。这样子的打印，也就是无预览了。只能直接打印出来。我想问一下，能实现EXCEL的预览吗？多谢！！！！

Answer 1

dim xlsheet as excel.worksheet
.....
.....
xlsheet.PrintPreview

Answer 2

如下测试通过
Private Sub Command1_Click()
Dim xlapp As Excel.Application
Dim xlsheet As Excel.Worksheet
Set xlapp = New Excel.Application
xlapp.Workbooks.Add
Set xlsheet = xlapp.ActiveSheet
xlapp.Visible = True
xlsheet.Range("A1") = "kkkkkkk"
xlsheet.PrintPreview
End Sub