보호된 워크시트에서 표를 확장 가능한 상태로 유지하면서 행을 삽입하는 방법은 무엇인가요?

Excel에서 워크시트를 보호하면 표의 자동 확장 기능이 종종 비활성화됩니다. 예를 들어, Table1이라는 이름의 표가 있고 보호된 워크시트의 마지막 행 아래에 데이터를 추가하려고 하면 표는 새 행을 포함하도록 자동으로 확장되지 않습니다. 그러나 보호된 워크시트에서도 표를 확장 가능하게 유지할 수 있는 방법이 있습니다. 이 튜토리얼에서는 워크시트가 보호된 상태에서도 표의 자동 확장을 활성화하기 위한 단계를 안내합니다.

VBA 코드를 사용하여 보호된 워크시트에서 표를 확장 가능한 상태로 유지하기

VBA 코드를 사용하여 보호된 워크시트에서 표를 확장 가능한 상태로 유지하기

아래 스크린샷과 같이 워크시트에 Table1이라는 표가 있으며, 표의 마지막 열은 수식 열입니다. 이제 수식 열이 변경되지 않도록 워크시트를 보호해야 하지만, 새 행을 삽입하여 표를 확장하고 새 셀에 데이터를 할당할 수 있도록 허용해야 합니다. 다음과 같이 진행하세요.

1. 개발 도구 > 삽입 > 버튼(양식 컨트롤)을 클릭하여 양식 컨트롤 버튼을 워크시트에 삽입합니다.

2. 나타나는 매크로 할당 대화 상자에서 새로 만들기 버튼을 클릭합니다.

3. Microsoft Visual Basic for Applications 창에서 아래 VBA 코드를 복사하여 코드 창의 Sub와 End Sub 사이에 붙여넣습니다.

VBA 코드: 보호된 워크시트에서 표를 확장 가능한 상태로 유지하기 위해 행 삽입하기

'Update by ExtendOffice 20220826
    Dim xRg, tableRg As Range
    Dim xRowCount As Integer
    Dim pswStr As String
    pswStr = "123"
    On Error Resume Next
    Application.ScreenUpdating = False
    ActiveSheet.Unprotect Password:=pswStr

    Set tableRg = ActiveSheet.ListObjects("Table4").Range
    xRowCount = tableRg.Rows.Count
    
    Set xRg = Range("Table4[[#Headers],[Total]]").Offset(1, 0)
    Set yRg = xRg.Resize(xRowCount, 1)
    xRg.Resize(xRowCount - 1, 1).AutoFill Destination:=yRg, Type:=xlFillDefault

    ActiveSheet.Protect Password:=pswStr, DrawingObjects:=False, _
                    Contents:=True, Scenarios:=False, _
                    AllowFormattingCells:=True, AllowFormattingColumns:=True, _
                    AllowFormattingRows:=True, AllowInsertingColumns:=True, _
                    AllowInsertingRows:=True, AllowInsertingHyperlinks:=True, _
                    AllowDeletingColumns:=True, AllowDeletingRows:=True, _
                    AllowSorting:=True, AllowFiltering:=True, _
                    AllowUsingPivotTables:=True
    Application.ScreenUpdating = True

참고:

4. Alt + Q 키를 눌러 Microsoft Visual Basic for Applications 창을 닫습니다.

5. 수식 열을 제외한 표의 셀을 선택한 다음 Ctrl + 1 키를 눌러 셀 서식 대화 상자를 엽니다. 셀 서식 대화 상자에서 잠금 확인란의 선택을 해제하고 확인 버튼을 클릭합니다. 스크린샷 참조:

6. 이제 VBA 코드에서 지정한 비밀번호로 워크시트를 보호합니다.

이제부터 보호된 워크시트에서 양식 컨트롤 버튼을 클릭하면 아래 스크린샷과 같이 새 행을 삽입하여 표가 확장 가능해집니다.

참고: 보호된 워크시트에서 수식 열을 제외한 표를 수정할 수 있습니다.

관련 문서:

• Excel에서 피벗 테이블의 슬라이서를 워크시트 스크롤과 함께 이동시키려면 어떻게 해야 하나요?
• Excel에서 셀을 결합하면서 셀 서식을 유지하려면 어떻게 해야 하나요?
• Excel에서 중복을 제거하지만 첫 번째 항목은 유지하려면 어떻게 해야 하나요?