两个EXCEK文件差别原因 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

下载信息 [文件大小：下载次数： ]
点击浏览该文件:狐表清单导出.xlsx

现在电子税务局开具fa piao时，可以通过EXCEL模板进行清单导入。这两个EXCEL文件内容都一样，而用狐表制作系统导出的EXCEL文件（狐表清单导出），在清单导入时一直报错；而用 fa piao开具项目信息导入模板就可以正常清单导入，经

下载信息 [文件大小：下载次数： ]
点击浏览该文件:fa piao开具项目信息导入模板.xlsx

比对后发现 fa piao开具项目信息导入模板（文件大小为62KB）,而狐表制作系统导出的狐表清单导出（文件大小为12.5KB），不知道是不是这个原因造成清单无法正常导入，现在想咨询下狐表制作系统导出同样内容的EXCEL文件为何会偏小？该如何解决？

就是用开具项目信息导入模板（文件大小为62KB）改造为Foxtable的execl模板，但导出的文件狐表清单导出（文件大小为12.5KB），在清单导入时一直报错

MainTable = Tables("开piao数据")

ShowAppWindow("清单导出.XLSx", 5)

Dim dr As String = Forms("fa piao清单导出").Controls("TextBox1").Value

If dr Is Nothing Then

MESSAGEBOX.SHOW("您未录入fa piao号码.")

Return Nothing

End If

Tables("开piao数据").Filter = "[fa piao号码] = '" & dr & "'" '筛选出记录

Dim cnt As Integer = DataTables("开piao数据").Select("[fa piao号码] = '" & dr & "' ").count

If cnt < 1 Then

MESSAGEBOX.SHOW("您录入fa piao号码不存在.")

Return Nothing

End If

Dim Book As New XLS.Book(ProjectPath & "\附件\全电fa piao清单导出.xlsx") '打开模板

Dim fl As String = ProjectPath & "Reports\清单导出.xlsx"

Dim Sheet As XLS.Sheet = Book.Sheets(0)

Sheet(3, 11).Value = " < fa piao号码 = '" & dr & "' AND 不含税金额 > 0 > " '写入打印条件

Book.Build() '生成报表

Book.Save(fl)

Dim Book1 As New XLS.Book(fl) '在生成具体对账单后设置有效

Dim Sheet1 As XLS.Sheet = Book1.Sheets(0)

Sheet1.Rows.Frozen = 6 '冻结前六行

Book1.Save(fl)

下载信息 [文件大小：下载次数： ]
点击浏览该文件:全电fa piao清单导出.xlsx

Dim Proc As New Process

Proc.File = fl

Proc.Start()

按照大师指点，终于解决问题，谢谢

主题：两个EXCEK文件差别原因