主题：狐爸请进“打印预览提示错误”（已解决）

 这个问题出现在有些电脑测试没问题，但是有些电脑不行，请问这是什么问题？

 错误截图： 

 
此主题相关图片如下：1.jpg

代码如下：

    Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(ProjectPath & "excel\当天销售明细单.xls")
    Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
    App.Visible = True
    Ws.PrintPreview
    App.Quit