以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于排序用S打头的编码? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97383) |
||||
-- 作者:guimingze -- 发布时间:2017/3/10 21:56:00 -- 关于排序用S打头的编码? 关于排序我在搜索里找了一个跟我一样情况的,就是在基础的狐表里按照固定顺序输入的,但是生成EXCEl的表里顺序就乱了,是因为后面有空行插入,有一位老师给的答案是用_sevlwa 好像是这么个函数但是我忘了具体咋写了。 请老师指教 |
||||
-- 作者:有点蓝 -- 发布时间:2017/3/10 22:30:00 -- 没看懂,截图说明 |
||||
-- 作者:guimingze -- 发布时间:2017/3/11 16:16:00 -- 回复:(有点蓝)没看懂,截图说明 图2 中的单位顺序按照 图1 生成 正常情况下基础表原来的顺序就是生成后的EXCEL顺序,但是中间加空行后就不一样了,恰恰我的基础表里有空行,而且空行还是必要的,如何设置代码老师 此主题相关图片如下:2.png Select Case e.Book.TempLate Case "横名册" Dim Filter As String = "单位名称 = \'" & e.DataRow("单位名称") & "\'" Dim dt As DataTable = DataTables("竖名册") Dim sum1 As Double = dt.Compute("Sum(正科配备)",Filter) Dim sum2 As Double = dt.Compute("Sum(实际正科)",Filter) Dim sum3 As Double = dt.Compute("Sum(副科配备)",Filter) Dim sum4 As Double = dt.Compute("Sum(实际副科)",Filter) Dim s1 As String = dt.GetComboListString("正科职数空缺", filter).replace("|", ",").trim(",") Dim s2 As String = dt.GetComboListString("正科职数备注", filter).replace("|", ",").trim(",") Dim s3 As String = dt.GetComboListString("副科职数备注", filter).replace("|", ",").trim(",") Dim s4 As String = dt.GetComboListString("副科职数备注", filter).replace("|", ",").trim(",") e.Book.Marks("分组统计字符") = "单位:" & e.DataRow("单位名称") & " 正科配备:" & sum1 & " 实际正科:" & sum2 & " 正科空缺:" & s1 & " 正科备注:" & s2 & " 副科配备:" & sum3 & " 实际副科:" & sum4 & " 副科空缺:" & s3 & " 副科备注:" & s4 |
||||
-- 作者:有点蓝 -- 发布时间:2017/3/11 16:26:00 -- 还是没看懂,放2个图对比一下,什么地方不一样 |
||||
-- 作者:guimingze -- 发布时间:2017/3/11 21:54:00 -- 回复:(guimingze)回复:(有点蓝)没看懂,截图说明... 我参考了 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=397883&ID=59338&skin=1 <竖名册,单位名称,-11,_Sortkey> 可以解决部分问题 但是 还是有的空行生成表的时候还是给整没了。 原来基础表 中第二监察分局副局长 与纪委接待员中间有空格, 但是生成模板后空行没了 |
||||
-- 作者:有点色 -- 发布时间:2017/3/12 20:42:00 -- 实例发上来测试。 |
||||
-- 作者:guimingze -- 发布时间:2017/3/12 22:22:00 -- 回复:(有点色) 实例发上来测试。 例如 竖名册 17 29 为空行 那么 生成EXCEL横名册 中想保留原来的空行 但是却被自动排序到最上面了
|
||||
-- 作者:有点色 -- 发布时间:2017/3/12 23:05:00 -- 空行那里,你要加上单位名称的值,如 市纪委,即可。 |
||||
-- 作者:guimingze -- 发布时间:2017/3/14 13:55:00 -- 回复:(有点色)空行那里,你要加上单位名称的值,如... 谢谢老师可以实现了 是否能将实现的空行变为合并单元格的空行呢老师 此主题相关图片如下:qra2niwhi4p9{g~bp{5k4yt.png |
||||
-- 作者:guimingze -- 发布时间:2017/3/14 14:20:00 -- 回复:(guimingze)回复:(有点色) 实例发上来... 按照老师的方案,又出现新的问题了 红色的是不用生成表的,绿色的是需要生成的 如何实现 此主题相关图片如下:f`r694z49@783hdabkwx.png |