Using Split function to create array (comma delimiter): Return to List

  arySubList = Split(strTerm, ",", , vbTextCompare)
  
' If only 1 term present, will simply be arySubList(0) item.
  
intUpper = UBound(arySubList)' Gives upper bounds; lower bounds always 0
  
For i = 0 to UBound(arySubList)
  
    strElement = arySubList(i)' Cycling through elements of the array
  
Next

See also:
Array Converted to Delimited Text String
Building an Array of Filenames (after browse)
Delimited Text to an Array (similar to Split())
Determining Upper & Lower Array Bounds
Erasing an Array (removing all the elements)
Feed an Array into a New Document (del dupes)
Filename Array from Active Directory
QuickSort routine
QuickSort Single Dimension
QuickSort (Fast!!) (Multidimensional on 2 dims)
QuickSort (Fast!!) (Multidimensional on 3 dims)
Removing Duplicates from an Array
SQL Query Results placed in an Array