Как создать цикл for из массива, полученного из функции split

Question

В моей таблице Excel есть столбец, который содержит ссылки на некоторые продукты типа "CTR_01", причем первые 3 буквы обозначают домен, к которому относится продукт. Кроме того, у меня есть пользовательская форма, которая позволяет мне редактировать некоторую информацию, имеющуюся в базе данных. Мне нужно сравнить домен, выбранный в выпадающем списке, с массивом, который я получил от функции split, использованной для ссылки, однако, похоже, она не работает.

For Each cell In Range("G3:G800")
    chaine() = split(cell.Value, "_")
Next

For i = LBound(chaine) To UBound(chaine)
   While dom = chaine(i)
      pro = Application.WorksheetFunction.Match(prolist, Sheets("Data").Range("Produit_edit"))
      //Something to do
   Wend
Next i

Answer 1

Я думаю, вы хотите сделать что-то вроде этого:

For Each cell In Range("G3:G800")

     chaine = Split(cell.Value, "_")

   If dom = chaine(0) Then

        ' do things if your dom = chaine i.e Domain for each cell

   End If

Next