Кэролин ищет способ убедиться, что ее документы проверены орфографией, прежде чем они будут закрыты. Она хочет использовать это как последнюю проверку документа.
Невозможно сделать это без использования макроса, но использовать макрос для этого относительно легко. Word включает несколько специальных макросов, которые выполняются в определенное время. Один из этих макросов выполняется всякий раз, когда документ закрывается. Все, что вам нужно сделать, это убедиться, что макрос имеет имя AutoClose и запускается всякий раз, когда документ закрывается.
Ниже приводится пример того, как вы можете создать такой макрос.
Sub AutoClose () Если Options.CheckGrammarWithSpelling Then ActiveDocument.CheckGrammar Else ActiveDocument.CheckSpelling End IfEnd Sub
Макрос сначала проверяет, настроен ли Word для проверки грамматики каждые время проверки орфографии. Если это так, то вызывается метод CheckGrammar; если это не так, то вызывается метод CheckSpelling.
Признавая, что вы можете не захотеть, чтобы проверка орфографии выполнялась в каждом отдельном документе, который вы закрываете, вы можете немного изменить макрос, чтобы пользователь спрашивается, нужно ли выполнять проверку орфографии. Эта версия макроса предоставляет пользователю возможность оставить отзыв:
Sub AutoClose () Dim iAnswer As Integer iAnswer = MsgBox («Выполнить проверку орфографии?», _ VbYesNo, «Проверка орфографии при закрытии ") If iAnswer 7 Then If Options.CheckGrammarWithSpelling Then ActiveDocument.CheckGrammar Else ActiveDocument.CheckSpelling End If End IfEnd Sub
Единственная разница в этом макросе заключается в том, что он спрашивает пользователя, следует ли запустить проверку орфографии. Если пользователь делает что-либо, кроме ответа «да», проверка орфографии пропускается, и документ продолжает закрываться.