-_-?
액셀에서 여러 시트를 일괄적으로 시트보호 및 시트보호 해제
똥닦는도인
2014. 6. 20. 14:10
반응형
적용 방법
Alt+F11을 눌러 VBE창을 연다.
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
4. 시트보호해제 (모든 시트에 같은 비밀번호를 사용하는 경우)
for each worksheet in worksheets:worksheet.unprotect "비밀번호":next worksheet
반응형