данная команда недоступна так как не открыт ни один документ
При попытке использовать VBA для изменения свойств документа появляется сообщение об ошибке при выполнении 4248, 4605 или 5941
Проблема
При попытке использовать Microsoft Visual Basic for Applications (VBA) для изменения свойств документа появляется одно из приведенных ниже сообщений об ошибке.
Ошибка при выполнении ‘4248’:
Команда недоступна, так как нет открытых документов
Ошибка при выполнении ‘4605’:
Метод или свойство недоступны, поскольку окно документа не активно
Ошибка при выполнении ‘5941’:
Запрашиваемый номер семейства не существует
Причина
Проблема возникает, когда нет открытых документов или не открыт документ, на который сделана ссылка. В программе Word предусмотрено изменение свойств только открытых документов.
Примечание. Такие сообщения об ошибках могут появиться также в том случае, если открыт документ, у которого свойство Видимый имеет значение Ложь.
Временное решение
Корпорация Microsoft предлагает примеры программного кода только для иллюстрации и не предоставляет явных или подразумеваемых гарантий относительно их корректной работы в конкретных случаях и в пользовательских приложениях. Примеры в данной статье рассчитаны на пользователя, имеющего достаточный уровень знаний соответствующего языка программирования, а также необходимых средств разработки и отладки. Специалисты служб технической поддержки Microsoft могут пояснить назначение тех или иных конструкций кода в конкретном примере, но модификация примеров и их адаптация к задачам разработчика не поддерживается. Если вам требуется дополнительная консультация по вопросам программирования, вы можете обратиться в службу консалтинга Microsoft или связаться с сертифицированными партнерами компании Microsoft. Дополнительную информацию о партнерах корпорации Microsoft можно найти в Интернете по следующему адресу:
http://www.microsoft.com/partner/referral/ За дополнительной информацией обратитесь к веб-узле корпорации Microsoft по адресу:
http://support.microsoft.com/default.aspx?scid=fh;RU;CNTACTMSЗа дополнительной информацией об использовании приведенных в этой статье примеров обратитесь к следующей статье Microsoft Knowledge Base:
290140 How to Run Sample Code from Knowledge Ниже приведен пример макроса на языке Visual Basic for Applications для изменения значения поля Заголовок в диалоговом окне Свойства. Пример содержит специальный программный код для перехвата ошибок на случай, если нет открытых документов, и вывода соответствующего сообщения.
Приведенный ниже программный код предусмотрен для выполнения следующих целей.
Перехват ошибок, если нет открытых документов
Создание нового документа при перехвате ошибки
Возобновление нормальной работы в строке, вызвавшей появление ошибки
Ссылки
Для получения помощи по работе с Visual Basic обратитесь к следующей статье Microsoft Knowledge Base:
305326 Programming Resources for Visual Basic for Applications
Не могу открыть файл MSword на сервере 1с
Модуль выполняется в регламентном задании на сервере 1с.
В толстом клиенте естественно все в порядке.
Но на сервере при выполнении кода
ЗаписьЖурналаРегистрации(«Получаем макет»,
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
Уведомление = ПолучитьМакет(«МакетВорд2»);
ИмяВремФайла=»C:\1ctemp\»+Прав(ПолучитьимяВременногоФайла(«.doc»),14);
Уведомление.Записать(ИмяВремФайла);
ЗаписьЖурналаРегистрации(«Получаем приложение «+ТипЗнч(Уведомление),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
MSWord = Новый COMОбъект(«Word.Application»);
//MSWord = Уведомление.Получить();
ЗаписьЖурналаРегистрации(«Получаем Документ «+ТипЗНЧ(MSWord),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
MSWordApp=MSWord.Application;
ЗаписьЖурналаРегистрации(«Получаем Word Application «+ТипЗНЧ(MSWordApp),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
MSWordApp.Visible = True;
Документ = MSWordApp.Documents.OpenNoRepairDialog(ИмяВремФайла);
ЗаписьЖурналаРегистрации(«Открыт Документ «+ТипЗНЧ(Документ)+» количество документов «+MSWordApp.Documents.Count,
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
Документ=MSWordApp.ActiveDocument;
ЗаписьЖурналаРегистрации(«Активизирован Документ «+ТипЗНЧ(Документ),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
Получаем такую вот ошибку.
Открыт Документ Не определено количество документов 0
<ВнешняяОбработка.ОповещениеОбОтпуске.МодульОбъекта(69)>: Ошибка при получении значения атрибута контекста (ActiveDocument): Произошла исключительная ситуация (Microsoft Word): Данная команда недоступна, так как не открыт ни один документ.
Собственно как видно из листинга. Нет открытых документов методы open и OpenNoRepairDialog по каким-то странным причинам не отрабатывают.
word с формой
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Сообщений [ 15 ]
1 Тема от Andreiii 31.12.2015 08:50:31
Тема: word с формой
Есть документы WORD с формами. При открытии документов через ссылку, документы виснут, VBA ругается, хотя если просто открывать документы, вопросов нет.
2 Ответ от admin 31.12.2015 10:29:09
Re: word с формой
выложите пример файла
3 Ответ от Andreiii 03.01.2016 07:32:56
Re: word с формой
пример.doc 53 Кб, 6 скачиваний с 2016-01-03
You don’t have the permssions to download the attachments of this post.
4 Ответ от Andreiii 09.01.2016 13:53:29
Re: word с формой
Да, чего-то не один документ с формой не открывается по ссылке. Вот и приплыли. А столько было надежд на формы.
5 Ответ от mikkelle 20.01.2016 11:17:06
Re: word с формой
На форме отсутствует элемент «Calendar». Отсюда и ошибка.
6 Ответ от Andreiii 30.01.2016 08:35:47
Re: word с формой
пример.doc перестал скачиваться. Сейчас выставлю второй.
пример1.doc 53 Кб, 2 скачиваний с 2016-01-30
You don’t have the permssions to download the attachments of this post.
7 Ответ от Andreiii 04.02.2016 06:53:16
Re: word с формой
Работает форум или нет? Неделю не могу скачать ничего с форума.
8 Ответ от Andreiii 08.02.2016 07:02:41
Re: word с формой
И оперой не скачивается и эксплорером. И ответа не получить. WORD EXPERT!!
9 Ответ от mikkelle 08.02.2016 12:00:27
Re: word с формой
Andreiii, я же вам писал, что в форме присутствует некий элемент управления, называемый «Calendar1». Скорее всего это фишка от некоего стороннего разработчика (не вдавался) и присутствовала, изначально, на том компьютере откуда вы брали свой файл.
При инициализации формы выдается ошибка.
Рисунок1.png 225.8 Кб, файл не был скачан.
You don’t have the permssions to download the attachments of this post.
10 Ответ от Andreiii 14.02.2016 07:36:52
Re: word с формой
К сожалению, что-то было с форумом, я ничего не мог скачать с него, поэтому не отвечал. Дело не в календаре. У меня все открывается замечательно. Скорее всего у Вас не установлен календарь. Я убрал календарь из формы, если он Вам не нравится. Проблема в том, что любой. документ с формой не открывается по гиперссылке. Я думал, что у кого-то есть мысли по этому поводу.
пример13.doc 45 Кб, 4 скачиваний с 2016-02-14
You don’t have the permssions to download the attachments of this post.
11 Ответ от Andreiii 14.02.2016 10:28:05
Re: word с формой
12 Ответ от Alex_Gur 16.02.2016 09:23:45
Re: word с формой
При открытии файла пример13.doc у меня появляется сообщение
Run-time error ‘4248’. Данная команда недоступна, так как не открыт ни один документ.
Ссылка идет на строку кода из процедуры ComboBox1_Change():
Попробуйте поставить проверку ошибки на эту строку кода.
13 Ответ от Andreiii 20.02.2016 07:07:09
Re: word с формой
Интересно, куда пропадают сообщения на этом форуме.
14 Ответ от Alex_Gur 20.02.2016 07:25:48
Re: word с формой
Хотелось бы узнать, удалось ли Вам решить проблему с формой?
15 Ответ от Andreiii 25.02.2016 15:51:17
Re: word с формой
Сообщений [ 15 ]
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Похожие темы
word с формой
Такому мощному редактору текстов, как Microsoft Word, посвящено очень много литературы. Эта программа настолько многогранна и многозадачна, что изучить все тонкости работы с ней очень сложно. На портале о Microsoft Office Word вы узнаете про: как перекрасить таблицу в ворде. Можно долгое время пользоваться Вордом и не подозревать о многих его скрытых возможностях.
На форуме сайта Ворд Эксперт собрана наиболее полная информация о функциях и нюансах работы различных версий приложения. На портале о Microsoft Office Word вы узнаете про: недостаточно памяти чтобы завершить операцию word 2007. Посетив форум, пользователь Ворда сможет не только найти готовые решения многих проблем, но и обсудить трудности и интересующие операции. На портале о Microsoft Office Word вы узнаете про: как сделать в word 2003 создание многоуровнего списка. Самые часто задаваемые вопросы (такие, как удаление лишних пробелов, абзацев, написание макросов в автоматическом режиме, назначение горячих клавиш для макросов и многое другое) собраны в один подраздел. Наш сайт о Microsoft Office Word даст ответ про: где взять серийный номер для активаций ws office 2007.
На форуме большое внимание уделено автоматизации различных операций. Предложены шаблоны и макросы для написания списков, печати больших текстовых массивов, работы с таблицами и иных часто повторяющихся операций. На портале о Microsoft Office Word вы узнаете про: как в ворде 2007 сделать шрифт по умолчанию.
В своем подразделе обсуждается форматирование и редактирование текста, настройки различных версий программы. Наш сайт о Microsoft Office Word даст ответ про: word 2007 медленно открывает файлы. Здесь вы найдете сведения о любой версии Ворда.
Наконец, вы просто можете оставить заявку на выполнение любой операции, описав проблему в подразделе «Заявки на разработку». На портале о Microsoft Office Word вы узнаете про: в индизайне фон страницы в клетку. Для свободного общения предусмотрена «Курилка».
Эта команда недоступна, так как при получении активного документа ни один документ не открывается
Когда я использую приведенный выше код, я получаю эту ошибку:
Эта команда недоступна, так как ни один документ не открыт.
1 ответ
У меня есть два документа. Один документ содержит имя человека, соответствующий ранг и идентификатор документа, этот документ находится в формате csv. Скриншот для того же самого приведен ниже. Другой набор документов содержит параграфы. Вот скриншот из набора других документов, эти документы не.
На самом деле вы пытаетесь получить доступ к активному документу, когда в приложении Word нет открытого документа, поэтому вы получаете сообщение об ошибке. Ваше приложение word открыто, но в нем не открыт ни один документ, т. е. Вы находитесь на главном экране приложения word, как показано на рисунке.
Попробуйте использовать следующий код, чтобы проверить, есть ли в вашем приложении какие-либо открытые документы, а затем получить доступ к ActiveDocument
Похожие вопросы:
Я использую приведенный ниже код. Он работает на моем компьютере, но когда мы запускаем его на сервере, я получаю ошибку> эта команда недоступна, так как ни один документ не открыт. Есть ли у.
Я хотел бы создать специальную коллекцию MongoDB под названием status и указать, что она может содержать только один документ. Ни при каких обстоятельствах я не хочу, чтобы эта коллекция содержала.
Будучи новичком в языке VBA, я исследовал эту простую задачу в течение нескольких часов, и у меня ничего не получилось. Я получаю сообщение об ошибке эта команда недоступна, потому что ни один.
У меня есть два документа. Один документ содержит имя человека, соответствующий ранг и идентификатор документа, этот документ находится в формате csv. Скриншот для того же самого приведен ниже.
Когда Word открывается, он открывает новый, несохраненный документ. Я работаю над словом-AddIn, и мне нужно сослаться на текущий документ, который может быть этим новым несохраненным документом. Мне.
Почему я получаю Document command not available error, когда пытаюсь выполнить действие утверждения для формы. Это как поток цикла утверждения. Эта ошибка возникает только для последнего.
Я продолжаю получать команда global недоступна. Убедитесь, что он включен PATH (в верхнем баре в Visual Studio code) при нажатии ctrl в vs code. Откуда это берется и как мне предотвратить его.
VBA » эта команда недоступна, так как ни один документ не открыт»
Будучи новичком в языке VBA, я исследовал эту простую задачу в течение нескольких часов, и у меня ничего не получилось. Я получаю сообщение об ошибке «эта команда недоступна, потому что ни один документ не открыт», и есть документ word с записью, идущей прямо вверх. Что здесь происходит? Спасибо за помощь.
1 ответ
Я пытаюсь открыть документ из access, выполнить слияние почты, а затем сохранить вывод документа из слияния с помощью VBA. Вот моя нынешняя попытка: Dim templateName as String, tempRoot as String tempRoot = C:\report\ templateName = tempRoot & template.doc Dim objDoc As Word.Document Dim.
Похожие вопросы:
Я использую приведенный ниже код. Он работает на моем компьютере, но когда мы запускаем его на сервере, я получаю ошибку> эта команда недоступна, так как ни один документ не открыт. Есть ли у.
Вероятно, это довольно тривиальный вопрос, но я очень новичок в VBA, так что мои знания довольно разнообразны. В принципе, то, что я сделал, это то, что у меня есть некоторый код VBA в excel.
У нас есть старые шаблоны Word, которые изначально были написаны для Word 97. Для каждой новой версии мы обновляли шаблоны. Теперь мы перейдем от Word 2003 к Word 2010, и, конечно, есть проблемы.
Я пытаюсь открыть документ из access, выполнить слияние почты, а затем сохранить вывод документа из слияния с помощью VBA. Вот моя нынешняя попытка: Dim templateName as String, tempRoot as String.
Перед запуском кода excel vba я открыл документ Word вручную, можно ли закрыть тот конкретный документ Word, который открыт через Excel VBA
Я пытаюсь интегрировать проверку орфографии word в приложение WinForms. До сих пор lib interop был сильной болью в тылу. После многих часов возни с ним я, наконец, получил реальную проверку.
В MS Word мне нужно определить, открыт ли какой-либо документ или ни один документ не открыт. Как это сделать?
Как скопировать все содержимое (около 2 страниц) документа Word в VBA и сохранить в переменной? Я продолжаю пробовать несколько вещей, ни одна из которых не работает: Dim mainData As String.