如何让EXCEL预览时,显示在狐表程序前显示。
代码如下:
Dim App As New MSExcel.ApplicationDim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)App.Visible = TrueWs.PrintPreviewApp.Quit