Страницы: 1
RSS
Выделение Фамилии и инициалов из текста
 
Доброго вечера, уважаемые форумчане, подскажите пожалуйста, есть ли готовые решение для выделения Фамилии и инициалов из текста. Пример структуры во вложении, таких строк будет около 3 тысяч
 
Цитата
Павел Иванов написал:
есть ли готовые решение для выделения Фамилии и инициалов из текста.
с такой постановкой вопроса - только со словарем искомых фамилий, ибо ФИО у вас есть и в начале, и в конце, и не везде ФИО (например, Дронов)
Изменено: buchlotnik - 08.11.2020 19:32:35
Соблюдение правил форума не освобождает от модераторского произвола
 
UDF
Код
Function iFIO(cell$)
 With CreateObject("VBScript.RegExp")
   .Pattern = "[А-ЯЁ][а-яё]+ [А-ЯЁ]\. [А-ЯЁ]\.?"
   If .test(cell) Then
     iFIO = .Execute(cell)(0)
   Else
     iFIO = ""
   End If
 End With
End Function
 
Спасибо, очень упростило задачу))
 
Павел Иванов, в данном случае мой совет к вашей текущей задаче вам не подойдёт, но на будущее, вдруг поможет, см. https://www.planetaexcel.ru/techniques/7/7751/
Изменено: New - 13.11.2020 18:44:15
 
Код
=TRIM(RIGHT(SUBSTITUTE(LEFT(A1;SEARCH(" ?. ?.";" "&A1&". ")+4);" ";REPT(" ";99));300))

Но споткнется на фамилиях без инициалов, также как и UDF.
Изменено: БМВ - 14.11.2020 08:02:50
По вопросам из тем форума, личку не читаю.
Страницы: 1
Наверх