Страницы: 1
RSS
Извлечь первые 4 цифры, идущие подряд в ячейке (год), Извлечь первые 4 цифры, идущие подряд в ячейке (год)
 
Помогите извлечь первые 4 цифры, идущие подряд в ячейке (год). Файл с примером, как должно получится, прилагаю.
Желательно формулой, но если нет, то и макрос можно.
Изменено: Nick Nick - 13.07.2020 12:01:56
 
Цитата
и макрос можно.
UDF
Код
Function iYear(cell As String)
 With CreateObject("VBScript.RegExp")
     .Pattern = "\d{4}"
     If .Test(cell) Then
       iYear = .Execute(cell)(0)
     Else
       iYear = "данные уточняются"
     End If
 End With
End Function
 
Спасибо вам большое!
 
=IFERROR(MID(C2;MIN(IF(ISNUMBER(--MID(SUBSTITUTE(SUBSTITUTE(C2;".";"!");" ";"!");ROW($1:$99);4));ROW($1:$99)));4);"данные уточняются")
Изменено: БМВ - 13.07.2020 12:26:41
По вопросам из тем форума, личку не читаю.
 
БМВ, спасибо!
Страницы: 1
Наверх