Excel에서 고급 필터를 사용하여 데이터를 다른 워크시트로 복사하는 방법은 무엇입니까?

Excel의 고급 필터 기능을 사용하면 데이터 세트에서 데이터를 추출하고 필터링할 수 있습니다. 동일한 워크시트 내에서는 원활하게 작동하지만, 필터링된 결과를 다른 워크시트로 복사하려고 할 때 경고 메시지가 나타날 수 있습니다. 이 가이드에서는 고급 필터 기능과 VBA 코드를 사용하여 필터링된 데이터를 다른 워크시트로 복사하는 방법을 단계별로 보여드리겠습니다.

고급 필터 기능을 사용하여 데이터를 다른 워크시트로 복사하기

VBA 코드를 사용하여 고급 필터로 데이터를 다른 워크시트로 복사하기

고급 필터 기능을 사용하여 데이터를 다른 워크시트로 복사하기

이 작업을 해결하기 위한 간단한 해결책은 다음과 같습니다. 아래 단계를 따라 해보세요:

1. 고급 필터 기능을 사용하여 필터링된 결과를 복사하려는 워크시트를 활성화합니다.

2. 그런 다음 데이터 > 고급을 클릭하세요. 스크린샷을 참조하세요:

3다음 고급 필터 대화 상자에서 다른 위치로 복사 를 동작 섹션에서 선택하고, 그 후 버튼을 클릭하여 필터링하려는 데이터 범위를 다른 시트에서 선택하세요. 목록 범위옆에 있는 버튼을 계속 클릭하세요. 버튼을 클릭하여 조건 범위 에서 조건을 선택하세요. 스크린샷을 참조하세요:

4그런 다음 버튼을 클릭하여 복사 대상 박스에서 필터링된 결과를 출력할 셀을 선택한 후 현재 시트에서 필터링된 결과를 출력할 위치를 지정하고 확인 버튼을 클릭하면 필터링된 결과가 원래 데이터 시트를 기반으로 다른 시트로 추출됩니다.

VBA 코드를 사용하여 고급 필터로 데이터를 다른 워크시트로 복사하기

VBA에 능숙하다면, 다음 VBA 코드를 사용하여 이 작업을 완료할 수 있습니다.

1. 필터링하고 결과를 다른 시트로 복사하려는 워크시트를 활성화합니다.

2. Excel에서 ALT + F11 키를 누르면 Microsoft Visual Basic for Applications 창이 열립니다.

3. 삽입 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여넣습니다.

VBA 코드: 고급 필터를 사용하여 데이터를 다른 워크시트로 복사하기:

Sub Advancedfiltertoanothersheet()
'Updateby Extendoffice
    Dim xStr As String
    Dim xAddress As String
    Dim xRg As Range
    Dim xCRg As Range
    Dim xSRg As Range
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the filter range:", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xCRg = Application.InputBox("Please select the criteria range:", "Kutools for Excel", "", , , , , 8)
    If xCRg Is Nothing Then Exit Sub
    Set xSRg = Application.InputBox("Please select the output range:", "Kutools for Excel", "", , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    xRg.AdvancedFilter xlFilterCopy, xCRg, xSRg, False
    xSRg.Worksheet.Activate
    xSRg.Worksheet.Columns.AutoFit
End Sub

4. 그런 다음 F5 키를 눌러 이 코드를 실행하면 필터링하려는 데이터 범위를 선택하도록 프롬프트 상자가 표시됩니다. 스크린샷을 참조하세요:

5. 확인을 클릭하면 필터링을 위한 조건 범위를 선택하라는 또 다른 대화 상자가 나타납니다. 스크린샷을 참조하세요:

6. 계속해서 확인을 클릭하고 새로워진 대화 상자에서 필터 결과를 출력할 새 워크시트의 셀을 선택하세요. 스크린샷을 참조하세요:

7. 마지막으로 확인 버튼을 클릭하면 필터링된 데이터가 필요에 따라 다른 지정된 시트로 출력됩니다.