Excel에서 셀 내용을 클릭만 해서 데이터를 필터링하는 방법은 무엇입니까?

일반적으로 Excel에서는 필요에 따라 데이터를 필터링하기 위해 필터 기능을 사용할 수 있습니다. 하지만 이 문서에서는 셀 값을 클릭하여 데이터를 필터링하는 방법에 대해 설명하겠습니다. 다음 데이터를 예로 들어, A2 셀을 두 번 클릭하면 아래 스크린샷과 같이 이 클릭된 값에 기반한 모든 해당 레코드가 즉시 필터링됩니다.

VBA 코드를 사용하여 셀 값을 클릭만 해서 데이터 필터링하기

VBA 코드를 사용하여 셀 값을 클릭만 해서 데이터 필터링하기

여기에서는 셀을 클릭하여 데이터를 필터링하기 위한 VBA 코드를 제공합니다. 아래 단계를 따르세요:

1. 먼저 데이터에 범위 이름을 지정하세요. 이름 상자에 범위 이름을 입력하고 Enter 키를 누릅니다. 아래 스크린샷을 참조하세요:

2. 필터링하려는 워크시트 탭을 마우스 오른쪽 버튼으로 클릭하고, 컨텍스트 메뉴에서 코드 보기 옵션을 선택하세요. 열린 Microsoft Visual Basic for Applications 창에서 다음 코드를 복사하여 비어 있는 모듈에 붙여넣으세요:

VBA 코드: 셀 값을 클릭하여 데이터 필터링하기:

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice
    Dim rgTable As Range
    Dim rgData As Range
    Dim xColumn As Integer
    On Error Resume Next
    Application.ScreenUpdating = False
    Set rgTable = Range("mydata")
    With rgTable
        Set rgData = .Offset(1, 0).Resize(.Rows.Count - 1, .Columns.Count)
        If Not Application.Intersect(ActiveCell, rgData.Cells) Is Nothing Then
            xColumn = ActiveCell.Column - .Column + 1
            If ActiveSheet.AutoFilterMode = False Then
                .AutoFilter
            End If
            If ActiveSheet.AutoFilter.Filters(xColumn).On = True Then
                .AutoFilter Field:=xColumn
            Else
                .AutoFilter Field:=xColumn, Criteria1:=ActiveCell.Value
            End If
        End If
    End With
    Set rgData = Nothing
    Set rgTable = Nothing
    Application.ScreenUpdating = True
End Sub

참고: 위의 코드에서 mydata는 데이터 범위에 대해 생성한 범위 이름입니다. 필요에 따라 변경하세요.

3. 그런 다음 코드 창을 저장하고 닫습니다. 이제 필터링하려는 데이터 범위의 아무 셀을 두 번 클릭하면 아래 스크린샷과 같이 해당 레코드가 필터링됩니다:

Kutools AI로 엑셀의 마법을 풀다

• 스마트 실행: 셀 작업 수행, 데이터 분석 및 차트 생성 - 간단한 명령어로 모든 것을 처리합니다.
• 사용자 정의 수식: 작업을 간소화하기 위한 맞춤형 수식을 생성합니다.
• VBA 코딩: 손쉽게 VBA 코드를 작성하고 실행합니다.
• 수식 해석: 복잡한 수식도 쉽게 이해할 수 있습니다.
• 텍스트 번역: 스프레드시트 내 언어 장벽을 허물어 보세요.

AI 기반 도구로 엑셀 활용 능력을 강화하세요. 지금 다운로드하여 그 어느 때보다 높은 효율성을 경험해 보세요!

관련 기사 더 보기:

셀을 클릭하여 셀 값을 변경하는 방법은 무엇입니까?

Excel에서 열 데이터를 정렬하기 위해 헤더를 클릭하는 방법은 무엇입니까?