Dim flg As New SaveExcelFlagsflg.RowNumber = Trueflg.CellStyle = TrueTables("订单").SaveExcel("C:\data\test.xls","订单",flg)
如果运行后就会出现错误