[求助] 在全局事件的 dredraw 中加入AddUserStyle ,但是导出exlcel没有颜色 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 在全局事件的 dredraw 中加入AddUserStyle ,但是导出exlcel没有颜色

共有2176人关注过本帖树形打印复制链接主题：[求助] 在全局事件的 dredraw 中加入AddUserStyle ,但是导出exlcel没有颜色

81538475

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

加好友

发短信

等级：六尾狐帖子：1287 积分：10368 威望：0 精华：1 注册：2018/1/20 12:40:00

[求助] 在全局事件的 dredraw 中加入AddUserStyle ,但是导出exlcel没有颜色 发帖心情

Post By：2020/4/23 11:01:00 [只看该作者]

Case "本次涨幅","工龄工资" ,"调薪后工资" ,"待遇总额"

Dim m As String = "变色"

Dim m2 As String = "变色2"

If e.Col.Name = "本次涨幅" Then

e.Table.DataTable.AddUserStyle(m2, Color.FROMARGB(240,240,240), Color.red)

e.Style = m2

Else

e.Table.DataTable.AddUserStyle(m, Color.FROMARGB(240,240,240), Color.black)

e.Style = m

End If

有点蓝

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

加好友

发短信

等级：超级版主帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/4/23 11:13:00 [只看该作者]

怎么导出exlcel的？

81538475

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

加好友

发短信

等级：六尾狐帖子：1287 积分：10368 威望：0 精华：1 注册：2018/1/20 12:40:00

Post By：2020/4/23 11:22:00 [只看该作者]

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

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

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

Tables("test").SaveExcel(dlg.FileName,"工资调整汇总") '保存文件

End If

有点蓝

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

加好友

发短信

等级：超级版主帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/4/23 11:25:00 [只看该作者]

http://www.foxtable.com/webhelp/topics/0559.htm

示例二

保存订单表，包括行号列和单元格样式：

Dim flg As New SaveExcelFlags
flg.RowNumber = True
flg.CellStyle = True
Tables("订单").SaveExcel("C:\data\test.xls","订单",flg)

81538475

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

加好友

发短信

等级：六尾狐帖子：1287 积分：10368 威望：0 精华：1 注册：2018/1/20 12:40:00

Post By：2020/4/23 12:03:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:导出测试.foxdb

还是不行

有点蓝

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

加好友

发短信

等级：超级版主帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/4/23 13:37:00 [只看该作者]

是有问题，已反馈

下一主题 >> << 上一主题

主题：[求助] 在全局事件的 dredraw 中加入AddUserStyle ,但是导出exlcel没有颜色