Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / ActiveDocument - Не открыт ни один документ / 13 сообщений из 13, страница 1 из 1
02.11.2010, 17:32
    #36934549
Krech791
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
Добрый день!
В Word открывается документ, мне нужно получить управление на него, я делаю
WordApp = CreateObject('Word.Application')
затем хочу получить управление открытым перед этим документом, я так понимаю правильно ругается на строчку
ActDoc = WordApp.ActiveDocument
"Данная команда недоступна, так как не открыт ни один документ."
Вопрос - как мне получить управление этим документом? Ведь он уже открыт, нужно опять делать Open или как?
...
Рейтинг: 0 / 0
02.11.2010, 18:24
    #36934717
f
f
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
Код: plaintext
1.
2.
WordApp = GetObject(,'Word.Application')
ActDoc = WordApp.ActiveDocument
...
Рейтинг: 0 / 0
02.11.2010, 18:28
    #36934722
ActiveDocument - Не открыт ни один документ
Krech791,
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
'если запущен только один экземпляр word, то можно
Set WordApp = GetObject(,"Word.Application")

'но лучше не гадать на кофейной гуще, а создавать новый экземпляр Word.Application
Set WordApp = CreateObject("Word.Application")

'и в нем открывать - "делать Open" (если надо изменить существующий документ)
Set ActDoc=WordApp.Documents.Open "c:\temp\importantdoc.doc"

'           или создавать на основе (если боязно изменять шаблон)
Set ActDoc=WordApp.Documents.Add "c:\temp\importantdoc.doc"
...
Рейтинг: 0 / 0
02.11.2010, 18:40
    #36934754
f
f
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
кому_как_нравится,
кто на чем програмирует. С чего вы решили, что в этом языке есть команда
Код: plaintext
Set
?
...
Рейтинг: 0 / 0
02.11.2010, 19:18
    #36934836
clerk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
А ActiveDocument не срабатывает?
...
Рейтинг: 0 / 0
02.11.2010, 19:52
    #36934886
f
f
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
Ципихович Эндрю
В каком этом языке????
На котором программирует топикстартер.
...
Рейтинг: 0 / 0
03.11.2010, 02:23
    #36935147
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
Krech791Добрый день!
В Word открывается документ, мне нужно получить управление на него, я делаю
WordApp = CreateObject('Word.Application')
затем хочу получить управление открытым перед этим документом, я так понимаю правильно ругается на строчку
ActDoc = WordApp.ActiveDocument
"Данная команда недоступна, так как не открыт ни один документ."
Вопрос - как мне получить управление этим документом? Ведь он уже открыт, нужно опять делать Open или как?Нет, он не открыт.
Когда ты запускаешь офисные приложения через ActiveX они не делают автоматическое создание нового документа.
...
Рейтинг: 0 / 0
03.11.2010, 10:22
    #36935389
Krech791
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
У меня не распознается GetObject, есть только CreateObject
Документ точно открыт, он в Word у меня прямо перед глазами, как он может быть не открыт?
Сделала еще раз Open, вроде все работает, посмотрим.
...
Рейтинг: 0 / 0
03.11.2010, 10:36
    #36935421
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
Krech791У меня не распознается GetObject, есть только CreateObject
Документ точно открыт, он в Word у меня прямо перед глазами, как он может быть не открыт?
Сделала еще раз Open, вроде все работает, посмотрим.

ctrl+alt+del вызов диспетчера задач

-процессы
-проверьте сколько winword в списки
-снимите все и заново запустите макрос

Некорректная работа при повторном запуске ворд при имеющемся незакрытом документе
...
Рейтинг: 0 / 0
03.11.2010, 10:48
    #36935454
f
f
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
Krech791У меня не распознается GetObject, есть только CreateObject

Язык какой?
...
Рейтинг: 0 / 0
03.11.2010, 11:48
    #36935681
Krech791
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
ПЕНСИОНЕРКА,

До открытия мной WINWORD =0
После открытия мной WINWORD =1
После открытия Word.Application - Open WINWORD остался 1
думаю я все верно делаю

А теперь вопрос - я вставила таблицу
par = ActDoc.Paragraphs(19)
ActDoc.Tables.Add(par.Range,4,2)

Теперь после этой таблицы мне надо добавить еще одну, как правильно работать с Paragrahs или лучше применять Sections - подскажите?
...
Рейтинг: 0 / 0
08.11.2010, 09:46
    #36941490
Krech791
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
Кто-нибудь может подсказать по последнему вопросу?
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
15.12.2011, 12:23
    #37577247
Semann
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ActiveDocument - Не открыт ни один документ
А кто-нибудь нашел ответ на последний вопрос?
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / ActiveDocument - Не открыт ни один документ / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]