Как определить номер открытого документа Word?
Wrd.Application.Documents(<Номер документа>).PrintOut
Как узнать этот номер?
Кроме того, как закрыть этот документ?
Ещё, забыл, когда я объявляю:
Dim Wrd As Word.Document
Set Wrd = New Word.Document
rd.Application.Documents.Open (<Имя файла>), , False
Равно и как:
Dim Wrd As New Word.Document
rd.Application.Documents.Open (<Имя файла>), , False
У меня, кроме нужного документа, открывается ещё и один пустой. Как этого избежать?
Открываю документ Word. Затем его надо распечатать.
Wrd.Application.Documents(<Номер документа>).PrintOut
Как узнать этот номер?
Кроме того, как закрыть этот документ?
А зачем именно номер (вещь не очень удобная, токо для циклов).
Есть масса других спосов:
1. какой-нибудь ActiveDocument, ThisDocument
2. Wrd.Application.Documents("НазваниеДокумента") ,НазваниеДокумента - тут помойму имя файла
3. наконец можно при создании просто хранить объектную ссылку (сам так часто делаю), очень удобно бывает, т.е.:
Set WrdDoc=Wrd.Application.Documents.Open .."ля-ля"
теперь можно спокойно обращаться к твоему документу через WrdDoc. И не надо боятся работать сразу с несколькими связанными переменными Wrd и WrdDoc, ну и что, что на WrdDoc мы можем выйти через Wrd, но нам так удобнее, деражть сразу две переменные, тем более, что они все равно являются всего лишь ссылками, так что памяти не жрут, а что еще для счастья надо.
А зачем именно номер (вещь не очень удобная, токо для циклов).
Есть масса других спосов:
1. какой-нибудь ActiveDocument, ThisDocument
2. Wrd.Application.Documents("НазваниеДокумента") ,НазваниеДокумента - тут помойму имя файла
3. наконец можно при создании просто хранить объектную ссылку (сам так часто делаю), очень удобно бывает, т.е.:
Set WrdDoc=Wrd.Application.Documents.Open .."ля-ля"
теперь можно спокойно обращаться к твоему документу через WrdDoc. И не надо боятся работать сразу с несколькими связанными переменными Wrd и WrdDoc, ну и что, что на WrdDoc мы можем выйти через Wrd, но нам так удобнее, деражть сразу две переменные, тем более, что они все равно являются всего лишь ссылками, так что памяти не жрут, а что еще для счастья надо.
Вроде как получилось, но всё равно открывается 2 документ, кроме того не могу сделать замену (см. вопрос про поиск и замену).:{
Вроде как получилось, но всё равно открывается 2 документ, кроме того не могу сделать замену (см. вопрос про поиск и замену).:{
Так это надо смотреть тогда твой код устанавливающий связь с документом и че ты с ним дальше делаешь...
например если ты через New Word.Application, то пустой грузится, туда еще документ надо б но загрузить, а вот если через какой-нибудь CreateObject или GetObject, то можно и с документом сразу загрузить и потом еще самому туда открыть
Так это надо смотреть тогда твой код устанавливающий связь с документом и че ты с ним дальше делаешь...
например если ты через New Word.Application, то пустой грузится, туда еще документ надо б но загрузить, а вот если через какой-нибудь CreateObject или GetObject, то можно и с документом сразу загрузить и потом еще самому туда открыть
А как загрузить в пустой документ другой документ? Я работаю через New Word.Application.