主题：[求助]

有没有什么方法可以通过附件中的分组统计生成一个故障率的统计图，让数量栏除以报检数量，然后得出百分比
此主题相关图片如下：无标题.png

两个方法放的一样的。。。

我换了种思路：

Dim t As Table = Tables("进货检信息表")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "报检日期"
g.TotalOn = "数量,报检数量"
g.Caption = "{0}日 小计"
g.DateGroup = DateGroupEnum.Day
t.SubtotalGroups.Add(g)

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "数量,报检数量"
g.Caption = "总计"
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

 

这个代码是在表格中，将每天的数据下面增加一行小计，有没有办法将时间范围调整，不要每天，改成自己控制的一段时间，比如：每月的1号到15号这个区间，代码该怎么改

 

我本来以为统计图的方法更简单一点，目的只是要实现可以监控一段时间里面的故障率，所以在帮助文件中找到这串代码。没有办法可以生成以周为单位的故障率吗？

我试了下以周为单位的统计，可以实现，效果基本可以达到目标了，但是我这个代码不知道该写在哪，我现在是写在命令窗口的