Григорий Боев

/**
 * Возвращает true, если value содержится в inData как ключ с разделителем delimiter
 *
 * @param {A:A} inData Исходный массив или одиночная строка
 * @param {"key"} value Значение, которое ищется среди слов
 * @param {1} delimiter Разделитель слов. По умолчанию - ","
 * @return Возвращает true, если inData - одиночное значение или аналогичный массив, если inData - диапазон
 * @customfunction
 */
function isContainText(inData,value,delimiter) {
  var delimiter = delimiter || ",";
  if (inData.map){
    return inData.map(function(el){return isContainText(el,value,delimiter)});
  }else{
    var data = inData.split(delimiter);
    if (!data) return false;
    return data.indexOf(value)!=-1;
  };
}

Public Function a()
    Dim s(1 To 5, 1 To 5)
    For i = 1 To 5
        For j = 1 To 5
            s(i, j) = CStr(i) + " " + CStr(j)
        Next j
    Next i
    a = s
End Function