主题：[求助]为什么分组统计出错了？

你的表格数据，应该有多余字符，比如空格或者换行符之类的。

编写下面代码处理一下原表数据，如

For Each r As Row In Tables("表A").rows
    For Each c As Col In r.Table.cols
        If c.DataCol.Expression = Nothing Then
            r(c) = cstr(r(c)).trim()
        End If
    Next
Next