Проблема с макросами

[midex777]

Здравствуйте!
У меня есть следующая задача:
Записать следующие макрокоманды:
− 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
--
Как сделать выход не разобрался..

Вопрос состоит в следующем - почему-то выходит сообщение - "invalid outside procedure" на начале любого макроса (sub ....)

[shanemac51]

Сообщение от midex777

"invalid outside procedure"

недействительны вне процедуры

--а где, в каком модуле вы поместили процедуры
--какой тип файла и версия WORD

[midex777]

Word 2007, тип фала .dotm

[shanemac51]

КАВЫЧЕК таких в редакторе нет --только простые (двойные и одинарные)

[midex777]

Сообщение от shanemac51

КАВЫЧЕК таких в редакторе нет --только простые (двойные и одинарные)

хорошо, но ошибка не в кавычках(( (кавычки я уже правил) ошибка на 1 строке - Sub AutoClose() и т.п.

Народ, кто может, помогите, пожалуйста, готов в благодарность на телефон $ закинуть.

[midex777]

People, Help!
Файл отправлю, благодарность тоже. Дело 5 минут кто понимает.

[midex777]

Всем спасибо разобрался) Тему можно закрывать.