Извлечь число из сложной строки, если оно попадает в заданный диапазон

Я сделал решение с помощью VBA:

Public Function BikeSize(MinSize As Integer, MaxSize As Integer, datainput As String)
    Dim dataoutput() As Variant
    ReDim dataoutput(0)
    BikeSize = 0
    datasplitted = Split(datainput, " ")
    arraysize = UBound(datasplitted)
    j = 1
    For i = 0 To arraysize
        m = datasplitted(i)
        If m >= MinSize And m <= MaxSize Then
            ReDim Preserve dataoutput(j)
            dataoutput(j) = m
            j = j + 1
        End If
        If m = "sm" Or m = "med" Or m = "lg" Then
            ReDim Preserve dataoutput(j)
            dataoutput(j) = m
            j = j + 1
        End If
    Next i
    totalresults = UBound(dataoutput)
    Select Case totalresults
        Case 0
            BikeSize = 0
        Case 1
            BikeSize = dataoutput(totalresults)
        Case Else
            For i = 1 To totalresults
                wrongresult = wrongresult & dataoutput(i) & " - "
            Next i
            BikeSize = wrongresult
    End Select
End Function

вы должны открыть макросы / Visual Basic перейдите в Modules _> Add Module и вставьте код на правой стороне (также см. как добавить VBA в MS Office?).

тогда, если ваша строка находится на ячейке A1, ваше минимальное значение на C1, ваше максимальное значение на D1 затем на B1 вы просто поставить =BikeSize(C1,D1,A1) получить результат.

если строка не соответствует номер выводит ноль 0.

если строка имеет более одного совпадающего номера, она выводит все совпадения через дефис.

Он также признает sm,med и lg.