从dynamic表中计算平均VBA

我在Excel上有一个表格,数字和重量(以千克为单位)

有人可以在一个星期内每天插入他的体重,或者只是一次或者根本不插入。 我无法pipe理。 然后我的桌子可以从字面上改变。 从零到七个甚至一周更多的行(如图像的黄色一侧)。

我想要做的是计算每周的平均体重。 然后我每周会有一行,当我至less有一个重量(有时我不会有任何线)。 我们可以有一周没有任何重量,所以我不想要这条线。 我们也可以很容易地在第2周但是在第5周和第6周之间在黄色表中占有重量。 如果有人把他的体重插在别人身上,那会发生。

我怎么能说这两周是相似的,所以我们计算这两个重量的平均值?

在这里输入图像说明

我希望这张照片足够清晰

使用下面C列中的公式计算平均值(假设A列中的周数和B列中的权重)

 =AVERAGEIF(A:A,A2,B:B) 

平均列复制 – >仅粘贴特殊值,然后删除重复基于星期和新的平均列