Тема: Проблема с макросами
Здравствуйте!
У меня есть следующая задача:
Записать следующие макрокоманды в шаблон при открытии которого:
− AutoNew, при запуске которой происходит отключение всех панелей и линейки прокрутки;
− AutoClose, при запуске которой происходит включение всех отключенных ранее панелей и линейки прокрутки;
− Печать, при запуске которой выполняется печать;
− Выход, при запуске которой происходит выход из программы
Word без сохранения изменений в документе.
Макросы написал в следующем виде:
AutoNew:
--
Sub AutoNew()
With Application.CommandBars("Status Bar")
.Visible = Not .Visible
End With
End Sub
--
AutoClose
--
Sub AutoClose()
With Application.CommandBars("Status Bar")
Not .Visible=Visible
End With
End Sub
--
Печать:
--
Sub printDoc()
ActiveDocument.PrintOut
End Sub
--
Как сделать выход не разобрался.. что-то типа:
--
Sub AutoClose()
If ActiveDocument.Saved = False Then ActiveDocument.Save
End Sub
--
Вопрос состоит в следующем - почему-то выходит сообщение - "invalid outside procedure" на начале любого макроса (sub AutoClose(), например)