到处excel怎样连合并和合计也带上？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 到处excel怎样连合并和合计也带上？

共有2741人关注过本帖树形打印复制链接主题：到处excel怎样连合并和合计也带上？

a2029460

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：124 积分：1116 威望：0 精华：0 注册：2016/2/24 17:44:00

到处excel怎样连合并和合计也带上？ 发帖心情

Post By：2018/3/4 9:48:00 [显示全部帖子]

如题，一个表合并合计模式后，用代码导出是不带这俩功能的，请问怎么一模一样的导出啊

a2029460

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：124 积分：1116 威望：0 精华：0 注册：2016/2/24 17:44:00

Post By：2018/3/4 15:13:00 [显示全部帖子]

导出的时候带不上合计模式啊！！！！

a2029460

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：124 积分：1116 威望：0 精华：0 注册：2016/2/24 17:44:00

Post By：2018/3/4 15:14:00 [显示全部帖子]

SaveExcel(FileName, SheetName, Flags)

FileName：目标Excel文件名，含路径。
SheetName: 工作表名。
Flags：可选参数，SaveExcelFlags类型，用于设置保存选项。

SaveExcelFlags类型的属性包括：

CellStyle：是否保存单元格样式，默认为False
RowNumber：是否包括行号列，默认为False
MergedRanges：是否保存合并模式，默认为True
VisibleOnly：是否只保存可见列，默认为True

a2029460

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：124 积分：1116 威望：0 精华：0 注册：2016/2/24 17:44:00

Post By：2018/3/5 18:39:00 [显示全部帖子]

Dim flg As New SaveExcelFlags

flg.RowNumber = True

flg.CellStyle = True

flg.VisibleOnly = True

flg.MergedRanges = True

Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog

dlg.Filter= "Excel文件|*.xls" '设置筛选器

If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮

Tables("库销存_Table1").SaveExcel(dlg.FileName,"库销存_Table1",flg ) '保存文件

End If

就这4个参数我都是true了合计还是带不上啊合并到是带上了

主题：到处excel怎样连合并和合计也带上？