Вытащить из ячейки все символы кроме цифр - VBA

Узнай цену своей работы

Формулировка задачи:

Подскажите пожалуйста, как вытащить из ячейки все символы кроме цифр в ответе где два пробело д.б. подряд неотобразились в таблице, но логика понятна (все кроме цифр)
  правильный ответ
123456789, 123 лесоповал лес , лесоповал лес
1234567812345678 3241, "ййй" , "ййй"
8777лл про лес лл про лес
4586 ро 123458 ро
ццц 444 5556; длдлд ццц ; длдлд

Решение задачи: «Вытащить из ячейки все символы кроме цифр»

textual
Листинг программы
  1. Sub pr1()
  2.     Dim x As Range
  3.     With CreateObject("vbscript.regexp")
  4.         .Global = True
  5.         .Pattern = "\d+"
  6.         For Each x In Selection
  7.             x.Offset(, 1) = .Replace(x, "")
  8.         Next
  9.     End With
  10. End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 3.6 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы