主题：百分比求和

没看懂

那就不要直接汇总完成率啊，用两个数据直接计算啊，代码发出来看看

那就代码，试试

Dim t As Table = Tables("表A")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()

g = New Subtotalgroup
g.GroupOn = "*"
g.TotalOn = "下达人数,申报人数"
g.DateGroup = DateGroupEnum.Day
t.SubtotalGroups.Add(g)

g = New Subtotalgroup
g.GroupOn = "*"
g.TotalOn = "下达人数,申报人数"
t.SubtotalGroups.Add(g)

t.Subtotal()

Dim r As Row
For i As Integer = 0 To t.Rows.Count(True) - 1
    r = t.Rows(i,True)
    If r.IsGroup Then
        r("完成率") = r("申报人数") / r("下达人数")
    End If
Next