导出数据出现无效索引 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

导出数据的代码，在发布之前可以正常导出编译之后点导出出现

此主题相关图片如下：2.png

导出代码如下

Dim flg As New SaveExcelFlags

flg.RowNumber = False

flg.CellStyle = False

Tables("订单组订单查询_mb").SaveExcel(ProjectPath & "test.xls","原始数据",flg)

Dim App As New MSExcel.Application

Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(ProjectPath & "test.xls")

Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets("待导入数据")

Dim Rg As MSExcel.Range = Ws.UsedRange

rg.Formula = rg.Formula

app.visible = True

主题：导出数据出现无效索引