Excel 드롭 다운 목록에서 선택한 항목을 기반으로 인접한 셀로 빠르게 이동하는 방법은 무엇입니까?

Excel의 드롭 다운 목록에서 선택한 항목을 기반으로 인접한 셀로 이동하도록 이미지를 만든 적이 있습니까? 예를 들어, 여기에는 요일 이름이 포함 된 C1 셀에 드롭 다운 목록이 있고 A 열은 날짜 목록이고 B 열은 시간 목록입니다. 이제 목요일과 같이 드롭 다운 목록에서 요일 이름을 선택하면 커서가 A 열의 목요일에 인접한 B5로 이동합니다. Excel에는이 작업을 해결하는 기본 기능이 없지만 강력한 VBA 코드가 가능합니다.

VBA에 의한 드롭 다운 목록의 값을 기준으로 인접한 셀로 이동

---

VBA에 의한 드롭 다운 목록의 값을 기준으로 인접한 셀로 이동

1. 드롭 다운 목록에서 사용할 요일을 선택한 다음 Alt + F11 활성화하는 키 응용 프로그램 용 Microsoft Visual Basic 창.

2. 클릭 끼워 넣다 > 모듈, 코드 아래에 붙여 넣으십시오. 모듈.

VBA : 값에 따라 인접 셀로 이동

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20161221
    If Target.Address <> [C1].Address Then
       Exit Sub
    Else
       JumpToCell

    End If
End Sub

Sub JumpToCell()
    Dim xRg, yRg As Range
    Dim strAddress As String
    strAddress = ""
    Set yRg = Range("A2:A8")
    For Each xRg In yRg
    'MsgBox Cell.Value
        If xRg.Value = ActiveCell.Value Then
           strAddress = xRg.Address
        End If
    Next
    If strAddress = "" Then
       MsgBox "The Day You Selected in Cell D4 Was Not Found On " & ActiveSheet.Name, _
        vbInformation, "Kutools for Excel"
       Exit Sub
    Else
       Range(strAddress).Offset(0, 1).Select
    End If
End Sub

3. 프레스 F5 키를 누르면 커서가 드롭 다운 목록의 값에 따라 인접한 셀로 이동합니다.

참고 :

VBA 코드에서 A2 : A8은 드롭 다운 목록의 값과 일치하는 값이 포함 된 목록이며 필요에 따라이 참조를 변경할 수 있습니다.