Запрет функции копировать-вставить

[dzv]

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

Посмотрите вложение. Там пустой файл, при открытии которого, запрещаются ряд функций и действий по комбинациям клавиш. Попробуйте поработать с ячейками и листами. При закрытии файла, все возвращается обратно.
Посмотрите код макроса (все защиты специально убрал). Уберите лишние для Вашего случая запреты. Там все должно быть понятно.

После того как попробавал Ваш файл у меня пропали в обычных файлах Екселя функции вставки, копированя и удаления. Хотя удалил и макрос и этот файл и перегружал компьютер, ничего не помогло...
Помогите пожалуйста востановить все функции!

Ивините! Разобрался, открыл снова Ваш файл и закрыл, все вернулось на свои места. Жаль что я чайник в этом деле, но мне как и автору нужно запретить вставлять ячейки именно в мой файл.

[dzv]

хотя добовлять строки так и не могу...
Помогите решить данную проблему пожалуйста!

[SAS888]

хотя добовлять строки так и не могу...

При закрытии файла все запрещенные функции должны восстанавливаться.
Попробуйте выполнить такой макрос:

Sub EnableControl()
    Dim i As Integer, ComBar As CommandBar, ComBarCtrl As CommandBarControl
    On Error Resume Next
    For i = 20 To 1000
        For Each ComBar In Application.CommandBars
            Set ComBarCtrl = ComBar.FindControl(ID:=i, recursive:=True)
            If Not ComBarCtrl Is Nothing Then ComBarCtrl.Enabled = True
    Next: Next
End Sub

[dzv]

попробовал, непомогло
А возможно как-то сбросить настройки Excel 2003, может быть это поможет?!

(через "Вставка" не могу даже выбрать "ячейки...", горит серым)

[SAS888]

через "Вставка" не могу даже выбрать "ячейки...", горит серым

Откройте и закройте файл "Книга1.xls" из вложения в посте №2. Все должно восстановиться.

[dzv]

к сожалению не помогло...

[SAS888]

Странно. Тогда попробуйте выполнить такой макрос:

Sub EnableBar(): Application.CommandBars(1).Reset: End Sub

[dzv]

Спасибо Вам за помочь!
Но я чайник и возможно не правильно запускаю макрос. Объясните в 2-х словах, как его правильно запускать, возможно я запускаю не правильно и эта ошибка не исправляеться у меня

Кое-что появилось. Теперь я могу добовлять через Правка/ячейка.
Но если я выделяю целую строку, то:
1) Серым становиться "Столбецы" (через правка), неактивным.
2) Если даже не выделяю и нажимаю правой кнопкой мыши или также выделяю, не могу выбрать "Добавить ячейки".
Может эту проблему как-то решить можно?!

[SAS888]

Откройте файл из вложения и запустите макрос "Main". Предварительно установите самый низкий уровень безопасности макросов.

[dzv]

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

Откройте файл из вложения и запустите макрос "Main". Предварительно установите самый низкий уровень безопасности макросов.

К сожаленью не помогло.
Видимо я когда занимался удалением команд из 2-го поста и запускав тот файл после каждого удаления, что-то не то сделал.