Страницы: 1
RSS
Задача определения и отбора чисел соответствующим определенным критериям из имеющегося списка
 
Добрый день, уважаемые формучане.

Есть список из полседовательности чисел в диапазоне:
100000 - 199999

Всего 100 000 чисел представленных списком.

Есть задача - в соседних с числами списка ячейках эксель автоматически прописывал параметр, соответствующий определенным критериям отбора чисел.
Например в случае:
1. Повторения 5 символов в числе после первого знака (правило хААААА. Например, число 100000, 122222, 188888 и т.д.), в ячейке напротив числа автоматически ставился признак "1"
2. В случае если первые три символа диапазона совпадают, а также совпадают последующие три символа числа (правило АААВВВ, например число 111222, 111333 и т.д.), напротив списка, в ссоедней в соседней с числом ячейки ставился признак "2".

Подскажите, пожалуйста, какие формулы можно применить для решения подобного вопроса?
Благодарю.
 
Попробуйте UDF
Код
Function iDigits5(cell$)
 With CreateObject("VBScript.RegExp")
     .Pattern = "1(\d)\1{4}"
    If .test(cell) Then
      iDigits5 = "1"
    Else
      .Pattern = "([1])\1{2}([2-9])\2{2}"
      If .test(cell) Then
        iDigits5 = "2"
      Else
        iDigits5 = "0"
      End If
    End If
 End With
End Function
Страницы: 1
Наверх