Форум программистов, компьютерный форум, киберфорум
Наши страницы

VBA

Войти
Регистрация
Восстановить пароль
 
Ришта
0 / 0 / 0
Регистрация: 18.07.2015
Сообщений: 1
#1

Вставка содержимого буфера в Замещающий текст - VBA

30.05.2016, 10:40. Просмотров 160. Ответов 1
Метки нет (Все метки)

Добрый день. Есть макрос в Ворде, который копирует подпись под рисунком и вставляет его в Замещающий/альтернативный текст.

Код:
PureBasic
1
2
3
4
5
6
7
    ...
    Dim objClpBrd As DataObject, sClpbrdText As String
    Set objClpBrd = New DataObject
    objClpBrd.GetFromClipboard
    sClpbrdText = objClpBrd.GetText
    ...
    Selection.InlineShapes(1).AlternativeText = sClpbrdText
И он работает, но проблема в том, что работает как-то выборочно. Часть подписей вставляется нормально, а на части вылезает ошибка "Run-time error '5941': Запрашиваемый номер семейства не существует."

Например, "Совокупность процедур проектирования БД" вставляется нормально.
А "Пример слоев интегрированной ГИС" уже не хочет.

Никакой схемы в сбоях проследить не могу - это не зависит от количества объектов в буфере, не видно, чтобы реагировало на какие-то конкретные символы в подписи или на длину этой подписи. Причём непосредственно в буфер макрос пишет в любом случае, а вот вставляет в Замещающий текст через раз. Что ему может быть не так?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.05.2016, 10:40
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Вставка содержимого буфера в Замещающий текст (VBA):

Вставка текста из буфера обмена Windows - VBA
Уважаемые форумчане ситуация следующая: MS Access 2007 В базе есть свое контекстное меню (просмотреть, добавить, изменить, удалить),...

Вставка картинки на лист из буфера обмена - VBA
Имеется код, который якобы должен сохранять картинки в файл excel из буфера обмена. Подскажите плиз, как его запустить? В VBA я не...

Вставка данных буфера обмена в Excel из макроса, выполняющегося в Word - VBA
Мне нужно очень срочно сделать передачу данных из Word'а в Excel, мне казалось самым простым будет использовать буфер, но если можно не...

Копирование значения ячейки по нажатию и вставка из буфера в определенное место - VBA
Добрый день! Надеюсь на помощь в поиске решения) Есть отчет, в котором постоянно изменяется список товаров (выделен зеленой...

Как получить текст из буфера обмена? - VBA
Пишу макрос (Word), вот фрагмент кода: Selection.Copy Windows('EMA').Activate Selection.Find.ClearFormatting With Selection.Find ...

Текст из буфера обмена поместить в разные столбцы одной строки - VBA
Здравствуйте, реально ли осуществить такое что бы тест из буфера обмена раскидывался в разные столбцы одной строчки? например в буфер...

1
KoGG
5264 / 1337 / 314
Регистрация: 23.12.2010
Сообщений: 2,015
Записей в блоге: 1
30.05.2016, 13:15 #2
Версия № 1: разные типы Shape, часть обычные Shape, другие InlineShape .
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
30.05.2016, 13:15
Привет! Вот еще темы с ответами:

VBA Word как записать в переменную текст из буфера обмена? - VBA
Добрый день! Как сделать так, что бы в iLink записывалось содержимое буфера обмена? (макрос делает гиперссылку) iText =...

Вставка в текст объекта WordArt - VBA
Создание нового документа MS Word. Вставка в текст объекта WordArt с текстом, введенным пользователем. Изменение текста объекта WordArt....

Специальная вставка, как текст - VBA
Такая проблема, в цикле сравнивал значения двух колонок на разных листах и попадалось так что одинаковые числа на первый взгляд не...

Перемещение содержимого ячейки Б в ячейку А при удалении содержимого в ячейке А - VBA
Суть проблемы следующая. Имеется диапазон ячеек с текстом в каждой. При выделении любой из ячеек и удалении содержимого в ней, содержимое...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.