본문 바로가기
-_-?

액셀에서 여러 시트를 일괄적으로 시트보호 및 시트보호 해제

by 힙합느낌 2014. 6. 20.
반응형
적용 방법
Alt+F11을 눌러 VBE창을 연다.
Ctrl+G을 눌러 직접 실행창을 연다.
 
직접실행창에 아래 소스를 복사하여 넣고 소스 끝에서 엔터를 친다.

1. 시트보호 (시트 마다 비밀번호를 입력하고 싶을 때)
For Each Worksheet In Worksheets: Worksheet.Protect: Next Worksheet
 
2. 시트보호 (모든 시트에 같은 비밀번호를 입력하고 싶을 때)
for each worksheet in worksheets:worksheet.protect "비밀번호":next worksheet
 
3. 시트보호해제 (시트 마다 비밀번호가 다른 경우)
For Each Worksheet In Worksheets: Worksheet.Unprotect: Next Worksheet

4. 시트보호해제 (모든 시트에 같은 비밀번호를 사용하는 경우)
for each worksheet in worksheets:worksheet.unprotect "비밀번호":next worksheet
반응형