| |
|
|
| | Подскажите какой командой из Access записать в Word ссылку
У меня в базе хранится Wordовский документ как шаблон и я програмно его открываю и заполняю данными из Access. Среди данных есть адреса сайтов и нужно чтобы в документе они были не просто текстом, а именно ссылкой.
запись текста в Word произвожу следующей функцией
Function TypeText(V)
obWindow.Selection.TypeText Text:="" & V
End Function
|
Попробовал писать ссылку следующей командой
obWindow.Hyperlinks.Add Anchor:=Selection.Range, Address:=V, SubAddress:="", ScreenTip:="", TextToDisplay:=V
|
но Access ругается на Selection
Может быть кто-то сталкивался с такой проблемой, подскажите | |
| |
| |
| |
|
|
| | Написано странице Ворд: ААААААААААААААА. Курсор в конце.
ObWord.Selection.MoveLeft Unit:=wdCharacter, Count:=14, Extend:=1 'Это выделение текста
ObWord.ActiveDocument.Hyperlinks.Add Anchor:=Selection.Range, Address:= _
"http://hiprog.com/forum/", SubAddress:="", ScreenTip:="", TextToDisplay _
:="AAAAAAAAAAAAAA"
Это запись гиперссылки.
Получено записью макроса в Ворде. ObWord - объект - сам Ворд | |
| |
| |
| |
|
|
| | понятно, что ругается, selection это свойство объекта Word.Application или объекта Word.Window, вот и надо их указывать, видимо ... Anchor:=obWindow.Selection.Range | |
| |
| |
| |
|
|
| | Bellerofont прав. Наверняка в этом дело. Надо проверять.
Извиняюсь, что дал пример без проверки. | |
| |
| |
| |
|
|
| | Нет господа знатоки, тут дело в чем то другом
пробовал я и так и так.
по идее нужно использовать Word.Window т.е. окно документа, но . . . | |
| |
| |
| |
|
|
| | конечно, дело может быть и в другом тоже. Вам указано на одну из ошибок | |
| |
| |
