根据凭证来做科目汇总表，请指教

jiang__qun

本人access 水品差所以用了excel的格式，意图是用access来做科目汇总表，
主要是有凭证清单，但是没有科目表，而凭证清单中的科目全是末级的，需要汇总各级科目的数据如何做到？目前只知道科目的编制规则是4-2-2-2-2-2-2-2 在现有条件下是否可以实现？请高手指点! （是否可以通过access 中的一些文本函数取出清单中科目的不同级次来汇总？）

nt_ljm

建议用数据透视表做科目汇总表，前提是要有一个合适的数据源表。根据你的样表做了稍许改动，主要是把科目的每一级作为一个字段，由此生成的数据透视表看看是否能达到目的。
凭证转科目汇总.rar (119.18 KB, 下载次数: 100)

2009-10-30 12:16 上传

点击文件名下载附件

jiang__qun

但是，并没有达到我在sheet2中的效果。而且我希望在access中来实现
  还是非常感谢您的热心！

zez

SELECT DISTINCTROW Left([科目编码],4) AS 表达式1, Sum(Sheet1.贷方金额) AS 贷方金额之总计, Sum(Sheet1.借方金额) AS [借方金额 之 总计]
FROM Sheet1
WHERE (((Len([科目编码]))>=4))
GROUP BY Left([科目编码],4)
ORDER BY Left([科目编码],4)
UNION
SELECT DISTINCTROW Left([科目编码],6) AS 表达式1, Sum(Sheet1.贷方金额) AS 贷方金额之总计, Sum(Sheet1.借方金额) AS [借方金额 之 总计]
FROM Sheet1
WHERE (((Len([科目编码]))>=6))
GROUP BY Left([科目编码],6)
UNION
SELECT DISTINCTROW Left([科目编码],8) AS 表达式1, Sum(Sheet1.贷方金额) AS 贷方金额之总计, Sum(Sheet1.借方金额) AS [借方金额 之 总计]
FROM Sheet1
WHERE (((Len([科目编码]))>=8))
GROUP BY Left([科目编码],8)
UNION
SELECT DISTINCTROW Left([科目编码],10) AS 表达式1, Sum(Sheet1.贷方金额) AS 贷方金额之总计, Sum(Sheet1.借方金额) AS [借方金额 之 总计]
FROM Sheet1
WHERE (((Len([科目编码]))>=10))
GROUP BY Left([科目编码],10)
UNION
SELECT DISTINCTROW Left([科目编码],12) AS 表达式1, Sum(Sheet1.贷方金额) AS 贷方金额之总计, Sum(Sheet1.借方金额) AS [借方金额 之 总计]
FROM Sheet1
WHERE (((Len([科目编码]))>=12))
GROUP BY Left([科目编码],12)
UNION
SELECT DISTINCTROW Left([科目编码],14) AS 表达式1, Sum(Sheet1.贷方金额) AS 贷方金额之总计, Sum(Sheet1.借方金额) AS [借方金额 之 总计]
FROM Sheet1
WHERE (((Len([科目编码]))>=14))
GROUP BY Left([科目编码],14)
UNION
SELECT DISTINCTROW Left([科目编码],16) AS 表达式1, Sum(Sheet1.贷方金额) AS 贷方金额之总计, Sum(Sheet1.借方金额) AS [借方金额 之 总计]
FROM Sheet1
WHERE (((Len([科目编码]))>=16))
GROUP BY Left([科目编码],16);

[ 本帖最后由 zez 于 2009-10-30 14:50 编辑 ]

jiang__qun

太感谢了！查询语句我还要消化一段时间。非常感谢，这里的高人很多，而且很热情，再次感谢！！！！