Вторник, 13 Января 2015 г. 11:46
+ в цитатник
Вначале Access не понравилась запись: Dim wda As Word.Application
Заменила на: Set wda = CreateObject("Word.Application")
Теперь не нравится запись: Dim wwd As Word.Document
Не знаю даже на что и заменить.
Практически ни один пример из интернета у меня не работает.
В референс пытаюсь установить Microsoft Word 12.0 Object Library, но пишет, что есть конфликт "Name conflicts with existing module, project, or object library"
Dim wda As Object
Set wda = CreateObject("Word.Application")
Dim wwd As word.Document
Set wwd = GetObject("D:\Access\Word\TEMPLATO.dot")
Set wda = wwd.Parent
wda.Visible = True
wwd.Bookmark("nazvanie").Select
wda.Activate
With wda.Selection
.Goto Name:="nazvanie"
.TypeText Text:=Nz([Table].Form![nazvanie], " ")
End With
Set wwd = Nothing
Set wda = Nothing
http://www.sql.ru/forum/1136773/konflikt-s-word
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-