Защита всей папки рабочих книг (Microsoft Excel)
У Махеша есть несколько книг Excel, которые хранятся в одной папке.
Он задается вопросом, можно ли назначить пароль для всей папки, чтобы все книги были защищены.
Короткий ответ — нет, вы не можете сделать это в Excel. Однако вы можете применить ряд различных методов, которые обеспечат желаемый результат. Первый метод — использовать такую программу, как WinZip, чтобы объединить все книги в один zip-файл. Этот файл можно защитить паролем (в WinZip), чтобы не все могли его открыть. Затем вы можете открыть zip-файл (используя свой пароль) и дважды щелкнуть любую книгу в нем, чтобы изменить ее с помощью Excel. Результатом является то, что у вас есть «папка» (zip-файл), которая защищена, а отдельные файлы, которые она содержит, — нет.
Другой подход — поместить папку книги на сетевой диск, а затем попросить администратора сети защитить папку. Большинство сетевых операционных систем позволяют администраторам контролировать, кто может иметь доступ к определенным папкам и их содержимому.
Третий подход — использовать стороннюю программу для защиты папки.
Быстрый поиск в Интернете, несомненно, найдет несколько кандидатов, например следующих:
http://www.folder-password-expert.com
Вы также можете использовать макрос Excel для защиты книг. Хотя он не обеспечивает настоящей защиты на уровне папок, он позволяет максимально легко защитить все книги в папке.
Sub ProtectAll() Dim wBk As Workbook Dim sFileSpec As String Dim sPathSpec As String Dim sFoundFile As String sPathSpec = "C:\MyPath\" sFileSpec = "*.xls" sFoundFile = Dir(sPathSpec & sFileSpec) Do While sFoundFile <> "" Set wBk = Workbooks.Open(sPathSpec & sFoundFile) With wBk Application.DisplayAlerts = False wBk.SaveAs FileName:=.FullName, _ Password:="swordfish" Application.DisplayAlerts = True End With Set wBk = Nothing Workbooks(sFoundFile).Close False sFoundFile = Dir Loop End Sub
Убедитесь, что вы изменили переменные sPathSpec и sFileSpec в начале кода, чтобы отразить папку, содержащую книги, и шаблон для имен книг, которые вы хотите защитить. Макрос предполагает, что все книги не защищены; в противном случае макрос запросит пароль для книги.
_Примечание: _
Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.
link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера]
.
ExcelTips — ваш источник экономичного обучения Microsoft Excel.
Этот совет (2878) применим к Microsoft Excel 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Excel (Excel 2007 и более поздних версий) здесь:
link: / excelribbon-Protecting_an_Entire_Folder_of_Workbooks [Защита всей папки книг]
.