풀다운 목록에 따라 행 숨기기 및 숨기기 해제

Question

드롭다운 메뉴의 형식을 지정할 때 메뉴에서 선택한 항목의 결과를 저장할 셀을 지정합니다.

이를 "셀 링크"라고 하며 항상 다음을 포함합니다.숫자드롭다운 메뉴 목록에서 사용자가 선택한 위치와 동일합니다.

INDEX()를 사용하여 메뉴 항목 목록에서 메뉴 항목의 실제 값을 가져올 수 있습니다.이 튜토리얼 페이지VBA를 사용하여 행을 숨기거나 숨기기 해제하는 방법을 보여줍니다.

이에 대해 시작하도록 하겠습니다. 하지만 이 사이트는 "나를 위한 코드 작성 사이트"가 아닙니다. VBA로 코딩하는 방법을 배우려면 시간을 투자해야 합니다.

먼저 드롭다운 목록을 올바르게 설정해야 합니다. 아래 그림에서는 드롭다운 목록(콤보 상자라고도 함)을 사용하여 귀하와 유사한 일부 데이터를 설정했습니다.

여기에서는 컨트롤의 형식을 지정하고 입력 범위(목록 항목)를 A2:A8로, 셀 링크를 B2로 정의했습니다. 드롭다운에서 "모두 표시"를 선택하면 "모두 표시"가 목록의 7번째 항목이기 때문에 셀 B2에 7이 표시됩니다.

이제 귀하의 임무는 유사한 드롭다운 목록을 만들고 여기에 이 매크로를 할당하는 것입니다.

Sub ShowHideRows()
'Set up variables
Dim ResultText As String
        
'Initialize variables
'If choice is "Show All", set ResultText to ABCD, a value that won't be found
'Otherwise, get the text from the list
If Range("B2") = 7 Then
    ResultText = "ABCD"
Else
    ResultText = Application.WorksheetFunction.Index(Range("A2:A7"), Range("B2"))
End If

MsgBox (ResultText)
        
End Sub

모든 작업을 올바르게 수행했다면 목록에서 항목을 선택할 때마다 선택한 목록 항목을 표시하는 메시지가 표시됩니다.

VBA를 작성하고 디버그하는 방법이나 VBA 모듈을 컨트롤에 할당하는 방법에 대해 자세히 배워야 한다면 인터넷을 사용하여 해당 작업을 수행하는 방법을 조사하십시오.

문제가 발생하면 여기에 질문하세요.

Answer 1