Выберите элемент тока в jQuery

Чтобы использовать регулярные выражения непосредственно в формулах Excel, может помочь следующая UDF (функция, определенная пользователем).

Как это работает

Он принимает 2-3 параметра.

1. Текст для использования регулярного выражения.
2. Регулярное выражение.
3. Строка формата, определяющая, как должен выглядеть результат. Он может содержать $0, $1, $2 и т. Д. $0 - это полное совпадение, $1 и up соответствуют соответствующим группам совпадений в регулярном выражении. По умолчанию $0.

Некоторые примеры

Извлечение адреса электронной почты:

=regex("Peter Gordon: some@email.com, 47", "\w+@\w+\.\w+")
=regex("Peter Gordon: some@email.com, 47", "\w+@\w+\.\w+", "$0")

Результаты в: some@email.com

Извлечение нескольких подстрок:

=regex("Peter Gordon: some@email.com, 47", "^(.+): (.+), (\d+)$", "E-Mail: $2, Name: $1")

Результаты в: E-Mail: some@email.com, Name: Peter Gordon

Чтобы разделить объединенную строку в одной ячейке на ее компоненты в нескольких ячейках:

=regex("Peter Gordon: some@email.com, 47", "^(.+): (.+), (\d+)$", "$" & 1)
=regex("Peter Gordon: some@email.com, 47", "^(.+): (.+), (\d+)$", "$" & 2)

Результаты в: Peter Gordon some@email.com ...

Как использовать

Чтобы использовать этот UDF, выполните следующие действия (примерно на основе этой страницы Microsoft . У них есть дополнительная дополнительная информация!):

1. В Excel в файле с поддержкой макроса («.xlsm») нажмите ALT+F11, чтобы открыть Редактор Microsoft Visual Basic для приложений .
2. Добавить ссылку VBA в библиотеку регулярных выражений (бесстыдно скопировано из Portland Runners ++ answer ): нажмите Инструменты -> Ссылки (пожалуйста, извините немецкий скриншот) [/g14] Найдите Microsoft VBScript Regular Expressions 5.5 в списке и поставьте галочку рядом с Это. Нажмите OK .
3. Нажмите Insert Module . Если вы присвоите модулю другое имя, убедитесь, что модуль не имеет то же имя, что и UDF ниже (например, имя модуля Regex, а функция regex вызывает #NAME! ). [/g15]
4. В большом текстовом окне в середине вставьте следующее:

   Function regex(strInput As String, matchPattern As String, Optional ByVal outputPattern As String = "$0") As Variant
       Dim inputRegexObj As New VBScript_RegExp_55.RegExp, outputRegexObj As New VBScript_RegExp_55.RegExp, outReplaceRegexObj As New VBScript_RegExp_55.RegExp
       Dim inputMatches As Object, replaceMatches As Object, replaceMatch As Object
       Dim replaceNumber As Integer
   
       With inputRegexObj
           .Global = True
           .MultiLine = True
           .IgnoreCase = False
           .Pattern = matchPattern
       End With
       With outputRegexObj
           .Global = True
           .MultiLine = True
           .IgnoreCase = False
           .Pattern = "\$(\d+)"
       End With
       With outReplaceRegexObj
           .Global = True
           .MultiLine = True
           .IgnoreCase = False
       End With
   
       Set inputMatches = inputRegexObj.Execute(strInput)
       If inputMatches.Count = 0 Then
           regex = False
       Else
           Set replaceMatches = outputRegexObj.Execute(outputPattern)
           For Each replaceMatch In replaceMatches
               replaceNumber = replaceMatch.SubMatches(0)
               outReplaceRegexObj.Pattern = "\$" & replaceNumber
   
               If replaceNumber = 0 Then
                   outputPattern = outReplaceRegexObj.Replace(outputPattern, inputMatches(0).Value)
               Else
                   If replaceNumber > inputMatches(0).SubMatches.Count Then
                       'regex = "A to high $ tag found. Largest allowed is $" & inputMatches(0).SubMatches.Count & "."
                       regex = CVErr(xlErrValue)
                       Exit Function
                   Else
                       outputPattern = outReplaceRegexObj.Replace(outputPattern, inputMatches(0).SubMatches(replaceNumber - 1))
                   End If
               End If
           Next
           regex = outputPattern
       End If
   End Function
   

5. Сохраните и закройте Microsoft Visual Basic для приложений Окно редактора.