vba - 如何在VBA上按单元格内容获取平均值

Question

在 Excel 中，我的第 1 列包含代码，第 2 列包含数字，如下所示:

      A  B    
1    AAA 10
2    AAA 12
3    AAA 14
4    BBB  9
5    BBB 10
6    BBB 11

我需要一段代码来计算平均值 BY TICKER，这意味着在这种情况下我将得到 AAA 平均值:12 和 BBB 平均值 = 10，等等。到目前为止，我得到的只是这段代码，它试图计算总和，我稍后会做除法，但是出了问题:

For row = 2 to 6
Ticker = Cells(row - 1, 1)
If Cells(row, 1) = Cells(row - 1, 1) Then
sum = sum + Cells(row, 2)
Else
Cells(row, 6) = sum
sum = 0
row = row + 1
Next

我收到一条错误消息，提示“For 缺失”

Answer 1

也许 C1 中是这样的。

=IF(A1<>A2,AVERAGEIF(A:A,A1,B:B),"")