Вытащить из ячейки все символы кроме цифр - VBA
Формулировка задачи:
Подскажите пожалуйста, как вытащить из ячейки все символы кроме цифр
в ответе где два пробело д.б. подряд неотобразились в таблице, но логика понятна (все кроме цифр)
правильный ответ | |
123456789, 123 лесоповал лес | , лесоповал лес |
1234567812345678 3241, "ййй" | , "ййй" |
8777лл про лес | лл про лес |
4586 ро 123458 | ро |
ццц 444 5556; длдлд | ццц ; длдлд |
Решение задачи: «Вытащить из ячейки все символы кроме цифр»
textual
Листинг программы
- Sub pr1()
- Dim x As Range
- With CreateObject("vbscript.regexp")
- .Global = True
- .Pattern = "\d+"
- For Each x In Selection
- x.Offset(, 1) = .Replace(x, "")
- Next
- End With
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д