Хочу открыть из excel документ word, изменить колонтитул и отправить на печать.
что делаю:
При обращении к колонтитулу вылетает 'Object doesn't support this property or method'.
При попытке напечатать вылетает "Runtime error: 5148. Число должно находиться в диапазоне -32765 до 32767"
Никак не пойму что не так.
что делаю:
Код |
---|
Dim xs As Object Dim wd As Object Dim wdApp As Object Set wdApp = CreateObject("Word.Document") Set wd = wdApp.Application.Documents.Open("d:\filename.docx") wd.Sections(1).Footers(wdHeaderFooterPrimary).Range.Text = "ttt" wd.Application.PrintOut Range:=wdPrintRangeOfPages, Copies:=1, Pages:="2" ... |
При попытке напечатать вылетает "Runtime error: 5148. Число должно находиться в диапазоне -32765 до 32767"
Никак не пойму что не так.