重装系统后无法导出全部数据：
多次重装软件也没有得到改善
代码如下：
Dim flg As New SaveExcelFlags
flg.CellStyle=True
flg.RowNumber = False
flg.CellStyle = True
Tables("推广流水_table1").SaveExcel("E:\FOX昆旅\导出\推广流水.xls","推广流水",flg)
用以下代码：导出都无法正常显示，也无法打开
'Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
'If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
'dlg.Filter= "Excel文件|*.xls"
'Tables("推广流水_table1").SaveExcel(dlg.FileName,"推广流水_推广流水") '保存文件
'End If
电子表格报错如下：
Excel 恢复了公式和单元格值，但某些数据可能已丢失。
加好友 
发短信
Post By：2019/12/28 13:47:00 [只看该作者]
