Як запобігти видаленню рядків або стовпців у спільній незахищеній книзі?
Коли ви ділитеся книгою з іншими, як ви можете заборонити іншим видаляти стовпці або рядки вашої спільної книги, не захищаючи книгу? Тут я знаходжу код VBA, який може перешкодити іншим видаляти стовпці та рядки у спільній книзі.
Запобігання видаленню рядків або стовпців у спільній книзі з VBA
Запобігання видаленню рядків або стовпців у спільній книзі з VBA
1. прес Alt + F11 відкрити Microsoft Visual Basic для програми вікна.
2. клацання Insert > Модулі щоб відкрити вікно модуля, скопіюйте наступний VBA у вікно.
VBA: Запобігання видаленню рядків або стовпців.
Sub StopDeleteRowCols()
'Updateby20221221
Dim xBarControl As CommandBarControl
Application.OnKey "^{-}", ""
For Each xBarControl In Application.CommandBars.FindControls(ID:=293)
xBarControl.Enabled = False
Next
For Each xBarControl In Application.CommandBars.FindControls(ID:=294)
xBarControl.Enabled = False
Next
End Sub
3. клацання прогін кнопка або F5 клавішу на клавіатурі для запуску цього коду.
Потім, коли інші клацають правою кнопкою миші, щоб видалити вибрані стовпці або рядки, параметр «Видалити» не можна застосувати в контекстному меню. Дивіться знімок екрана:
Крім того, це не дозволяє користувачам використовувати комбінацію клавіш Ctrl + - для видалення рядків або стовпців.
Примітка:
(1) Якщо ви поділилися робочою книгою з Розгляд > Поділитися робочою книжкою, ви більше не можете додавати жодні макроси VBA. Тому вам краще додати VBA перед тим, як ділитися книгою.
(2) Цей VBA вимкне видаляти у контекстному меню у всіх книгах, коли ви клацаєте правою кнопкою миші на вибрані стовпці або рядки.
(3) Для відновлення видаляти у контекстному меню, будь ласка, замініть обидва Помилковий з Правда у VBA вище та запустіть VBA знову.
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!