Как убрать лишние символы в конце строки взятой из ячейки таблицы word
|
|
Пятница, 16 Октября 2020 г. 16:53
+ в цитатник
MIF: Тогда проанализировать что в конце строки
Dim ascii As Long
ascii = Asc(Right(shortstring, 1))
и удалять только когда они есть
Const CHAR_TO_DELETE As Long = Your_Value
If Len(shortstring) > 0 Then
If Asc(Right(shortstring, 1)) = CHAR_TO_DELETE Then
shortstring = Left(shortstring, Len(shortstring) - 1)
End If
End If
https://forum.sources.ru/index.php?showtopic=420047&view=findpost&p=3840450
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-
