从单独的工作表中循环遍历名称和每个名称的总销售额

Loop through names and total sales for each name from a separate worksheet

我正在尝试查看销售人员列表,获取每个名称并循环遍历销售列表,并获得每个销售人员的总销售额。我可以选择任何销售人员并循环浏览列表以获得该个人的总销售额,我遇到的问题是选择每个销售人员,然后转到下一个销售人员。

在我的电子表格中,range(i1:i525) 是所有 525 名销售人员的列表。 a 列有 10,000 个销售额。

这是我目前所知道的...

Sub find_tot()
Dim i As Integer
Dim x As Integer

x = 0
For Each t In Range("i1:i525")

    For i = 1 To 10000:
        If Cells(i, 1).Value Like t Then
            x = x + (Cells(i, 3).Value)
    Else:
        Cells(i, 4).Value = ""

        End If
        Range(i, 10).Value = x
    Next

Next t

End Sub

本机工作表 SUMIF 公式应该可以为您提供所需的结果。

with sheets("Sheet1")
    .range("i1:i525").offset(0, 1).formula = "=SUMIF(A:A, I1, C:C)"
end with

我不太确定 D 列的位置。