| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]保存表样式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=68229) |
| -- 作者：aduydgd -- 发布时间：2015/5/12 21:46:00 -- [求助]保存表样式 在帮助中有一章讲到：
如果希望打开一个保存文件对话框，保存到用户指定的文件中，可以参考下面的代码： Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
这个是可以保存EXCEL，我想在这个例子中在保存EXCEL的时候保存样式，帮忙看一下，谢谢
保存订单表，包括行号列和单元格样式： Dim flg As New SaveExcelFlagsflg.RowNumber = True flg.CellStyle = True Tables("订单").SaveExcel("C:\\data\\test.xls","订单",flg) |
| -- 作者：大红袍 -- 发布时间：2015/5/12 21:47:00 -- Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog dlg.Filter= "Excel文件|*.xls" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 Dim flg As New SaveExcelFlags flg.RowNumber = True flg.CellStyle = True Tables("订单").SaveExcel(dlg.FileName, "订单",flg) \'保存文件 End If |
| -- 作者：aduydgd -- 发布时间：2015/5/12 21:48:00 -- 没有效果啊，我也是这样用的 |
| -- 作者：大红袍 -- 发布时间：2015/5/12 21:50:00 -- 没有用，就说明你的样式设置有问题。
例子说明。 |
| -- 作者：aduydgd -- 发布时间：2015/5/12 21:52:00 -- 我是代码添加的样式，难道SQLQuery的表不能保存样式吗？ |
| -- 作者：大红袍 -- 发布时间：2015/5/12 21:55:00 -- 测试了一下，一样可以啊。
e.Table.DataTable.AddUserStyle("样式", color.Red, Color.Black) |
| -- 作者：aduydgd -- 发布时间：2015/5/12 22:00:00 -- 我是在表中添加的样式，在导出EXCEL时导出不了样式， |
| -- 作者：大红袍 -- 发布时间：2015/5/12 22:02:00 -- 表中添加样式不可能使用到queryTable中去的啊。
上传你的例子，样式，必须在drawcell里设置。 |
| -- 作者：aduydgd -- 发布时间：2015/5/12 22:02:00 -- 少写个参数，搞定 |