Как да задам парола за защита на скрития лист в Excel?
Ако имате работна книга, която съдържа някои важни скрити работни листове, и не позволявайте на други да ги показват. Сега трябва да зададете парола, за да защитите напълно скритите работни листове, когато други потребители ги покажат, те трябва да въведат паролата. Имате ли начини да се справите с тази задача бързо и лесно в Excel?
Задайте парола за защита на скритите листове с функцията VeryHidden
Задайте парола за защита на скрития лист с VBA код
Защитете няколко работни листа наведнъж с Kutools за Excel
Задайте парола за защита на скритите листове с функцията VeryHidden
Обикновено можете да използвате функцията VeryHidden, за да скриете първо работните листове и след това да зададете парола за тях, моля, направете следните стъпки:
1. Отворете работната си книга и задръжте Alt + F11за да отворите Прозорец на Microsoft Visual Basic за приложения.
2. В Прозорец на Microsoft Visual Basic за приложения, Щракнете върху Гледка > Project Explorer намлява Прозорец за свойства to показват техните панели.
3. И тогава в Проект-VBAProject изберете работния лист, който искате да скриете, и в Имоти прозорец, щракнете върху падащия списък от Видим за да изберете xlSheetVeryHidden опция, вижте екранна снимка:
4. След като направите работния лист много скрит, можете да зададете парола, за да го защитите. В Прозорец на Microsoft Visual Basic за приложения, Щракнете върху Поставете > Модули за да отворите празен модул и след това щракнете Инструменти > Свойства на VBAProject, вижте екранна снимка:
5. След това изскочи VBAProject-Свойства на проекта кликнете върху Защита , след което проверете Заключване на проекта за преглед накрая въведете и потвърдете паролата в Парола за преглед на свойствата на проекта раздел, вижте екранна снимка:
6, След това кликнете OK бутон, за да излезете от този диалогов прозорец и да затворите Прозорец на Microsoft Visual Basic за приложения.
7. Запазете работната книга като Работна книга с активирани макроси на Excel форматирайте и го затворете, за да влезе в сила защитата с парола.
8. Следващия път, когато отворите тази работна книга и искате да направите видими много скритите листове, ще бъдете помолени да въведете парола. Вижте екранна снимка:
Демо: Задайте парола за защита на скритите листове
Задайте парола за защита на скрития лист с VBA код
За да зададете парола за защита на скритите листове, мога да говоря и за VBA код за вас.
1. Скрийте един работен лист, който искате да защитите.
2. Задръжте натиснат ALT + F11 за да отворите Прозорец на Microsoft Visual Basic за приложения.
3, След това изберете Тази работна книга отляво Project Explorer, щракнете два пъти върху него, за да отворите Модулии след това копирайте и поставете следния VBA код в празния модул:
VBA код: Задайте парола за защита на скрития лист
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim xSheetName As String
xSheetName = "Sheet1"
If Application.ActiveSheet.Name = xSheetName Then
Application.EnableEvents = False
Application.ActiveSheet.Visible = False
xTitleId = "KutoolsforExcel"
response = Application.InputBox("Password", xTitleId, "", Type:=2)
If response = "123456" Then
Application.Sheets(xSheetName).Visible = True
Application.Sheets(xSheetName).Select
End If
End If
Application.Sheets(xSheetName).Visible = True
Application.EnableEvents = True
End Sub
Забележка: В горния код, Sheet1 от xSheetName = "Лист1" script е скритото име на работен лист, което искате да защитите, и 123456 в Ако отговор = "123456" Тогава script е паролата, която задавате за скрития лист. Можете да ги промените според вашите нужди.
4. Сега, когато искате да покажете скрития лист, ще изскочи поле за подкана, за да ви позволи да въведете паролата. И това поле за подкана ще се появява всеки път, когато щракнете, за да покажете скрития лист.
Защитете няколко работни листа наведнъж с Kutools за Excel
Ако искате да защитите няколко избрани или всички работни листове от работна книга наведнъж, обикновено трябва да защитите един по един ръчно в Excel. Но, ако имате Kutools за Excel, Със своята Защита на работния лист помощна програма, можете да ги защитите с едно щракване.
Kutools за Excel : с повече от 300 удобни добавки за Excel, безплатни за изпробване без ограничение за 30 дни. |
След инсталиране Kutools за Excel, моля, направете следното:
1. Щракнете Kutools плюс > Защита на работния лист, вижте екранна снимка:
2. В Защита на работния лист диалогов прозорец, всички работни листове в работната книга са изброени в списъчното поле, моля, изберете работните листове, които искате да защитите. Вижте екранна снимка:
3, И после щракнете върху OK, в следния диалогов прозорец, моля, въведете вашата парола и я въведете отново, след което щракнете OK, ще изскочи друго поле за подкана, за да ви напомни колко работни листа са били защитени.
4, След това кликнете OK за затваряне на диалоговите прозорци и всички работни листове в работната книга са защитени с една и съща парола.
Забележка: Ако искате да премахнете защитата на всички работни листове наведнъж, просто трябва да щракнете Kutools плюс > Премахване на защитата на работния листи въведете паролата си, за да отмените защитата.
Изтеглете и изпробвайте безплатно Kutools за Excel сега!
Още по темата:
Как да защитите няколко работни листа наведнъж в Excel?
Как да задам парола за защита на работната книга?
Как да защитим / заключим VBA код в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!