-Поиск по дневнику

Поиск сообщений в rss_forum_sources_ru

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 29.07.2007
Записей:
Комментариев:
Написано: 80


Как убрать лишние символы в конце строки взятой из ячейки таблицы word

Пятница, 16 Октября 2020 г. 16:06 + в цитатник
Fellinggood: Здраствуйте. Хотел создать программу автоматического добавления автозамен из таблицы. ________________.JPG (, : 9)
Но столкнулся с проблемой при взятии текстового значения из ячейки таблицы и последующем добавлении возникает ошибка (см. скриншот).
________________.JPG (, : 9)
из за того что в конце есть лишние пробелы. При отладке программы в конце строки отображаются какие то квадраты (см. скрин).
________________.JPG (, : 9)
Я использовал функцию удаления пробелов в конце строки Trim(), но оне не убирает данные символы. Не подскажете что делать?

    Sub Макрос3()
    Dim longstring, shortstring, longs, shorts As String
    Dim iCell As Range
    Dim i As Integer
    Dim j As Integer
    Dim N As Integer
    Dim Num As Integer
    N = 58
    For i = 12 To N
    ActiveDocument.Tables(1).Cell(i, 1).Select
    shortstring = Selection.text
    shorts = RTrim(shortstring)
    ActiveDocument.Tables(1).Cell(i, 2).Select
    longstring = Selection.text
    AutoCorrect.Entries.Add Name:=shortstring, Value:=longstring
    Next i
    End Sub

https://forum.sources.ru/index.php?showtopic=420047&view=findpost&p=3840445

Метки:  

 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку