Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Корректировка макроса (удаление знаков до первого пробела), Нужно убрать все знаки до первого пробела в выделенном столбце
 
#1
12.02.2024 19:36:53
Здравствуйте уважаемые эксперты эксель, помогите пожалуйста скорректировать макрос, этот макрос убирает все знаки ПОСЛЕ первого пробела, а нужно чтобы он убирал все знаки ДО первого пробела, спасибо
Код
Sub T_366()
    On Error Resume Next
    Dim objC As Range
    For Each objC In Selection.SpecialCells(xlCellTypeConstants)
        objC = Split(objC, " ")(0) & ""
    Next
End Sub
 
 
 
#2
12.02.2024 19:41:54
Артём Москвитин замените строку на
Код
objC = Split(objC, " ")(1)
 
 
 
#3
12.02.2024 19:48:21
Евгений Смирнов, это второе слово.
По вопросам из тем форума, личку не читаю.
 
 
 
#4
12.02.2024 19:50:12
Цитата
написал:
Евгений Смирнов
Он теперь убирает всё до первого пробела и убирает всё после второго пробела )
 
 
 
#5
12.02.2024 20:02:03
если к регуляркам не прибегать , то
Код
objC = Mid(objC, InStr(objC, " ")+1)
Изменено: БМВ - 12.02.2024 20:10:55
По вопросам из тем форума, личку не читаю.
 
 
 
#6
12.02.2024 20:09:16
Цитата
написал:
БМВ
Жалуется почему то , скрин приложил
 
 
 
#7
12.02.2024 20:11:18
двоеточие затесалось случайно.
По вопросам из тем форума, личку не читаю.
 
 
 
#8
12.02.2024 20:17:50
Цитата
написал:
двоеточие затесалось случайно.
Огромная благодарность, всё работает, вопрос решён!
 
 
 
Страницы: 1
Наверх