Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Удаление последнего символа (точка с запятой), если он последний в строке VBA
 
#1
15.06.2019 11:45:11
Добрый день!
Подскажите как удалить символ ";" из определенных ячеек(например А1,B3,D4,E9) на листе, если он стоит последним в строке в этих ячейках, используя средства VBA?
 
 
 
#2
15.06.2019 11:53:36
Вариант:
Код
Sub qqq()
Dim rCell As Range
    For Each rCell In Range("A1, B3, D4, F9")
        If Right(rCell, 1) = ";" Then rCell = Left(rCell, Len(rCell) - 1)
    Next
End Sub
 
 
 
#3
15.06.2019 11:56:44
Код
sTxt = "abc;"
If Right$("abc;", 1) = ";" Then sTxt = Left$(sTxt, Len(sTxt) - 1)
 
 
 
#4
15.06.2019 15:42:40
Юрий М, vikttur,
спасибо большое!
 
 
 
Страницы: 1
Наверх