拆分一个数组并使用它来引用另一个表并对另一个相关字段求和

Question

In Access, I have an array of division numbers from a MultiSelect list that is in a text box as an comma delimited array. I would like to split the array. Once split, I'd like you use the division numbers to reference a division table and add number of stores related to each division. The table has Division 1, Number of Stores 10, Division 2, Number of Stores 20

I've tried to split the array and I don't know where to go from there.

Private Sub Stores_Impacted_Click()

    Dim TextString As String
    Dim Result() As String
    TextString = Me!mySelections.Value
    Result = Split(TextString, " ")
    Dim item As Variant
    For Each item In Result
  
    Next item
End Sub

Answer 1

You can use DCount and a single code line:

    For Each item In Result
        Debug.Print DCount("*", "DivisionTable", "Division = '" & item & "'")
    Next item