[DmitriiV]

Для работы со списком исключений (в данном случае) можно обойтись только строковыми функциями. Я обычно делаю так:

Код:

strExclude = "Иванова;Петров;Сидоров;"
strUser = "Иванов"
If InStr(1, strExclude, strUser & ";", vbTextCompare) = 0 Then
    WScript.Echo "Не является исключением."
Else
    WScript.Echo "Является исключением."
End If