Как в Word открыть окно вопроса? #437372

Можно ли в Ворде открыть окно вопроса? Есть начало, а что дальше? MsOffice = Новый COMОбъект("Word.Application"); MsgBox(prompt[, buttons] [, title] [, helpfile, context]) а как это вызвать в 1С?

попробуй через помощника

Не совсем понял, какого помощника? Если имеется ввиду синтакс-помощник, то там ничего нет!

Вопрос

Вопрос это вызывается окно вопроса в 1С:Преприятие, а мне нужно открыть окно вопроса в Вореде.

Ну и попробуй в VB задать через Execute

а можно немного поподробнее как это сделать?

нет. Через помощника в Ворде, агента в 1С. В ворде это скрепка, например

+7 агент выскакивает поверх всех окон и управление идет через 1С. Правда, это не совсем подходит для деловой документации:)

И еще можно почитать:

Зачем ?(с)

справка по Ворду мне также не помогла.

я про

что хотел то - точно можешь сказать, что за вопрос ?

ясно, но помощник был в MSOffice только до 2000 верси, в 2007 его уже нет. А пользователь всегда может использовать новейшие версии. , мне при сохранении документа Word, который был открыт, нужно задать вопрос, и при его ответе сделать соответствующие действия в 1С.

(9, 10) При создании макроса и его выполнении непосредственно в Ворде я в 1С не получу результата, который вернулся при ответе пользователя на вопрос.

дак ты из ворда запускай 1С по ОЛЕ и отправляй туда параметры.

Пожалуйста не подскажите как это сделать? Как именно передать параметр и как его значение потом получить после выполнения макроса?

я из 1С запускаю Ворд, и по Вашей ссылке создаю в нем макрос, но как получить результат выполнения макроса не знаю!

ну что, разобралсо?

пока нет!

когда запускаешь ворд - он и работает сам по себе. Пропиши в макросах параметры базы из которой ты запустил ворд. Пользователь в ворде сделает необходимые действия и ворд запустит 1С и передаст туда что тебе надо - например внесет изменения в константе. а как из ворда передать параметр в 1С - я не делал но думаю не особо сложно: 1S = CreateObject("V77.Application") и т.д.

ага.. но только в ворде нет процедры ПриЗакрытии :)

как нету? а Private Sub Document_Close End Sub

Надо делать так. Из 1С делаешь файл ворда с нужными данными и макросами. сохраняешь его и потом открываешь из 1С так ЗапуститьПриложение(<?>); RunApp(<?>); Пример: Замечание: Если необходимо дождаться завершения программы и получить ее код возврата (что требуется, например, при запуске внешних архиваторов) лучше использовать метод run системного объекта WScript.Shell. Пример: это для 7-ки, для 8-ки думаю тоже такое есть.

Понятно спасибо, Но мне нужно было открыть Ворд, и вылавливать у него событие перед сохранением (DocumentBeforeSave), что я и делаю. Перед сохранением Ворда у меня в 1С вызывается процедура ОбработкаСобытияДокумента, где я должен был спросить пользователя что он дальше хочет делать (но вопрос должен задаваться не в программе 1С, а в Ворде) и дальше выполнить необходимые действия в Базе 1С. я думал что это будет примерно так: Процедура ОбработкаСобытияДокумента(Doc, SaveAsUI, Cancel) Но оказалось не все так просто как я думал, и из ворда запускать заново приложение 1С у меня нет возможности (не известно какие параметры будут у 1С);

все гораздо просче и от макроса в 1С ответ легко получается, но можно и без макроса

продолжайте

Очень интересно

В модуль дока ворд В класс Вот и отлавливай эту вариаблу

А как такой макрос вставить в ворд? И как их разделить одну часть в модуль документа Вор, а вторую в класс(я не понял что такое класс).Так не получается? И как на счет второго варианта? Без макросов?

Хотелось бы конечно без макросов, а то пользователю придется включить исполнение макросов и ставить галочку "Доверять доступ к обектной модели проектов VBA". Что не каждый пользователь сделает!

С макросами примерно так

С использованием макроса я разобрался у меня получилось так: Вот так вроде работает, но нужно еще удалять созданный макрос (иначе при закрытии Ворда предлагается сохранить его в формате dotm, а этого не надо). И вообще нужно переделывать чтоб не использовались макросы (если это вообще возможно!). А то пользователи не знают и не хотят включать возможность исполнения макросов и ставить галочку "Доверять доступ к обектной модели проектов VBA".

тогда можно и вариаблы не пользовать

Это тоже хорошо, но все равно это будет роботать если только у пользователя стоит разрешение на исполнение макросов. А нужно без этого! Но все равно огромное спасибо!

когда это сделаешь, добавляй статью в КЗ

Обязательно

Может получится пописать макрос или сделать его внешним:

пописать = подписать

Вообще то можно и без подписания а вариант без макросов до тупости прост :)

ВСЁ РАБОТАЕТ!!!! Спасибо smaharbA. Действительно все просто! Чувство было, что должно быть не так всё сложно, но незнание не дало найти рациональное решение! Всем спасибо за помощь!

А что-нибудь бодобное WordBasic для Excel есть?

Есть. VBA

как я уже говорил VBA не подойдет, т.к. пользователю придется включить исполнение макросов и ставить галочку "Доверять доступ к обектной модели проектов VBA". Что не каждый пользователь сделает!