Защита красной строки от ее удаления

вся проблема в том что не все секретари легко обучаемы - есть ленивые, которые считают что word победит всех поэтому надо типа что-то такое просто для домохозяйки, и если можно не лезть в Стили для нее, но если без них никак то тогда что ж поделать

Alex_Gur
Конечно я просто в спешке не так написал - я сделал именно тот запрет о котором вы написали.
Ну дык есть соображения?

Эм. Вопрос как раз не в изменении Стилей а в том что с помощью backspace мы удаляем красную строку что не есть изменение стиля

На сегодняшний день, по-моему пока самый надежный способ борьбы с "блондинками" и лентяями такой:
1. Установить на их компьютер шаблон, который используете Вы для работы с документами, где все стили назначены с форматированием, устраивающее Вас, большинство используют шаблон Normal.
2. В модуле ThisDocument создайте процедуру ParagraphsClear()

Public Sub ParagraphsClear()
'
' Приведение форматирования абзацев к назначенным стилям
'
'
    ActiveDocument.Range.Select
    Selection.ClearParagraphDirectFormatting
End Sub

3. Затем в этом же модуле создайте процедуру Private Sub Document_Close()
Эта процедура реагирует всегда, когда пользователь закрывает документ.
Вставьте в нее такой код

Private Sub Document_Close()
    Call ParagraphsClear
    ActiveDocument.Save
End Sub

Теперь каждый раз при закрытии документа все настройки абзацев будут приводиться к настройкам стилей (отступы, выравнивание, интервалы табуляции и пр.), при этом настрой знаков будут сохраняться (курсив, полужирный и т.д.). Затем докумет автоматически сохраниться.

PS. Главное помнить, я уже неоднократно говорил об этом, что лучше создавать свои стили, с оригинальными названиями, отличающимися от стилей Worda, это нужно для того, чтобы при открытии Ваших файлов на других компах, не нарушалось форматирование созданное Вами, потому, что при использовании встроенных стилей Ворда, очень часто возникают конфликты совместимости одинаковых стилей на разных компах

То бишь "Основной"?