Как я могу проверить ячейки для числовых серий?

Question

У меня есть небольшая проблема с оценкой ячейки Excel. Пример:

          M   M   M   M   M   M   M   M   M   
          1   2   3   4   5   6   7   8   9
2;5;7
1;9
3;5;7;9   

У меня есть несколько ячеек Excel, которые содержат числа (месяцы). В первом столбце у меня есть ряд чисел. Я хочу использовать условное форматирование, чтобы закрасить соответствующие ячейки в правильных столбцах. Если бы он был правильно окрашен, я бы получил что-то подобное

          M   M   M   M   M   M   M   M   M   
          1   2   3   4   5   6   7   8   9
2;5;7         X           X       X
1;9       X                               X
3;5;7;9           X       X       X       X

Формула, которую я имею сейчас, такова:

IF(ISNUMBER(FIND(L$22;$K23));$H23;"")

но проблема в том, что ячейки тоже цветные, которые содержат часть числа. Если я введу 10; 15 в качестве ввода, я получу это:

          M   M   M   M   M   M   M   M   M   M   M   M   M   M   M
          1   2   3   4   5   6   7   8   9  10  11  12  13  14  15
10;15     X               X                   X                   X

потому что 1 и 5 тоже найдены. Я только хочу, чтобы колонки 10 и 15 были отмечены. Как я могу изменить формулу или ввод?

Answer 1

Подделка ваших входных данных может быть «обманом», но, возможно, проще всего! Я бы добавил точку с запятой в начале и конце ваших входных данных, а затем использовать

=FIND(";"&L$22&";",$K23)>0

хотя я думаю, что вам придется заменить запятую в этой формуле также на точку с запятой.

Answer 2

Я нашел некоторую функцию VBA, которую я изменил на это, и она работает:

Function CHECK_INTERVALL(str, colmonth, sepChar)

Dim months As Variant
months = Split(str, sepChar)
Dim i As Integer

CHECK_INTERVALL = False

For i = LBound(months) To UBound(months)
        If CInt(colmonth) = CInt(months(i)) Then
            CHECK_INTERVALL = True
        End If
Next i

End Function

Если текущий месяц находится в списке, я получаю значение true, и условное форматирование окрашивает ячейку.