- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 自动生成表格 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=144340)
-- 发布时间：2019/12/17 16:02:00
-- 自动生成表格
老师 请问我这个表格1 如何自动统计成表格2那样，自动根据表格1列出问题1 A多少人 B多少人
表格1：
此主题相关图片如下：2.png
此主题相关图片如下：2.png表格2：
此主题相关图片如下：企业微信截图_20191217155642.png
-- 发布时间：2019/12/17 16:13:00
--
第二个表的列A、B...和第一个表有什么关系？
-- 发布时间：2019/12/17 16:22:00
--
A列就是统计问题1 a1有几个，问题2 a2有几个 B列统计问题1 b1有几个 问题2 b2有几个
-- 发布时间：2019/12/17 16:25:00
--
这个2个表发上来测试
-- 发布时间：2019/12/17 16:38:00
--
就是通过A表 在B表中做个统计
-- 发布时间：2019/12/17 16:38:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
比如我A表中问题1 A有5个 然后在B表中 自动统计出A列对应问题1的那个单元格为5
[此贴子已经被作者于2019/12/17 16:40:08编辑过]
-- 发布时间：2019/12/17 16:54:00
--
B表，datacolchanged事件
If e.DataCol.Name = "问题" AndAlso e.DataRow.IsNull("问题") = False Then
For Each dc As DataCol In e.DataTable.DataCols
If dc.Name <> "问题" Then
e.DataRow(dc.Name) = DataTables("A").Compute("count(" & e.DataRow("问题") & ")",e.DataRow("问题") & "=\'" & dc.Name & "\'")
End If
Next
End If
-- 发布时间：2019/12/17 17:00:00
--
老师 好像没效果
-- 发布时间：2019/12/17 17:08:00
--
重置一下列
-- 发布时间：2019/12/17 18:34:00
--
老师 我这张表，用代码怎么统计问题1 a1有多少 b1有多少 问题2 a2有多少 b2有多少
此主题相关图片如下：企业微信截图_20191217183039.png