Excel에서 한 번에 폴더의 모든 통합 문서를 보호하는 방법은 무엇입니까?

Excel에서 통합 문서를 보호하여 다른 사용자가 편집하지 못하도록 할 수 있지만 한 번에 여러 통합 문서를 보호하기 위해 이미지를 만든 적이 있습니까? 여기에서는 폴더의 모든 통합 문서와 Excel 통합 문서의 여러 시트를 보호하는 몇 가지 트릭을 소개합니다.

VBA로 한 번에 폴더의 통합 문서 보호

Excel 용 Kutools로 한 번에 여러 시트 보호

놀랄 만한! Chrome, Firefox 및 Safari와 같은 Excel에서 효율적인 탭 사용!

시간의 50 %를 절약하고 매일 수천 번의 마우스 클릭을 줄이십시오!

VBA로 한 번에 폴더의 통합 문서 보호

특정 폴더의 통합 문서를 보호하기 위해 매크로 코드를 적용하여 해결할 수 있습니다.

1. 새 통합 문서를 활성화하고 Alt + F11 키를 눌러 응용 프로그램용 Microsoft Visual Basicns 창을 클릭하고 끼워 넣다 > 모듈e, 코드 아래에 붙여 넣기 모듈 스크립트.

VBA : 폴더의 통합 문서를 보호합니다.

Sub ProtectAll()
    Dim xWorkBooks As Workbook
    Dim xExitFile As String
    Dim xPassWord As Variant
    Dim xStrPath As String
    Dim xFileDialog As FileDialog
    Dim xFile As String
    On Error Resume Next
    Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
    xFileDialog.AllowMultiSelect = False
    xFileDialog.Title = "Select a folder [Kutools for Excel]"
    If xFileDialog.Show = -1 Then
        xStrPath = xFileDialog.SelectedItems(1)
    End If
    If xStrPath = "" Then
        Exit Sub
    Else
        xStrPath = xStrPath + "\"
    End If
    xPassWord = Application.InputBox("Enter password", "Kutools for Excel", , , , , , 2)
    If (xPassWord = False) Or (xPassWord = "") Then
        MsgBox "Password cannot be blank!", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xFile = "*.xls"
    xExitFile = Dir(xStrPath & xFile)
    On Error Resume Next
    Application.ScreenUpdating = False
    Do While xExitFile <> ""
        Set xWorkBooks = Workbooks.Open(xStrPath & xExitFile)
        Application.DisplayAlerts = False
        xWorkBooks.SaveAs Filename:=xWorkBooks.FullName, Password:=xPassWord
        Application.DisplayAlerts = True
        Workbooks(xExitFile).Close False
        Set xWorkBooks = Nothing
        xExitFile = Dir
    Loop
    Application.ScreenUpdating = True
    MsgBox "Successfully protect!", vbInformation, "Kutools for Excel"
End Sub

2. 프레스 F5 키 및 폴더 선택 모든 워크 시트를 보호 할 폴더를 선택하라는 창이 나타납니다.

3. 클릭 OK 통합 문서를 보호하기 위해 암호를 입력하라는 대화 상자가 나타납니다.

4. 클릭 OK, 선택한 폴더의 모든 통합 문서가 하나의 암호로 성공적으로 보호되었음을 알리는 대화 상자가 나타납니다.

위 코드로 보호 한 통합 문서를 열면 비밀번호를 입력하라는 대화 상자가 나타납니다. 스크린 샷보기 :

팁:이 코드는 2007 년 이상의 Excel 버전에서 작동하며, 하위 버전을 보호하기 위해 적용하려면 변경할 수 있습니다. xFile = "* .xls" 에 xFile = "* .xlsx" 코드에서.

Excel 용 Kutools로 한 번에 여러 시트 보호

실제로 일상 업무에서 통합 문서의 여러 시트를 보호하는 것이 더 자주 발생합니다. 그러나 Excel에서는 기본 제공 기능을 사용하여 시트를 하나씩 보호해야합니다. 하지만 강력한 도구가 있습니다. Excel 용 Kutools그 워크 시트 보호 유틸리티를 사용하면 통합 문서의 모든 시트 또는 선택한 시트를 한 번에 보호 할 수 있습니다.

후 무료 설치 Excel 용 Kutools는 다음과 같이하십시오.

1. 시트를 보호하려는 통합 문서를 활성화하고 Enterprise > 워크 시트 보호. 스크린 샷보기 :

2. 에서 워크 시트 보호 대화 상자에서 목록에서 필요에 따라 보호하려는 시트를 확인할 수 있습니다. 스크린 샷보기 :

3. 클릭 Ok, 암호를 입력하고 다시 입력 할 수있는 다른 대화 상자가 나타납니다. 스크린 샷을 참조하십시오.

4. 클릭 Ok, 워크 시트를 성공적으로 보호했음을 알리는 대화 상자가 나타납니다.

이 시트의 보호를 해제하려면 Enterprise > 워크 시트 보호 해제 보호 해제를 위해 암호를 입력합니다.

최고의 사무 생산성 도구

Excel 용 Kutools는 대부분의 문제를 해결하고 생산성을 80 % 향상시킵니다.

• 재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
• 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
• 셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
• 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
• 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
• 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
• 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
• 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
• 300 개 이상의 강력한 기능. Office / Excel 2007-2019 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에 쉽게 배포 할 수 있습니다. 전체 기능 30 일 무료 평가판. 60 일 환불 보장.

자세히보기 ... 무료 다운로드... 매수... 

---

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

• Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
• 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
• 생산성을 50 % 향상시키고 매일 수백 번의 마우스 클릭을 줄입니다!

자세히보기 ... 무료 다운로드... 매수...