Conas léim go tapa chuig an gcill in aice láimhe bunaithe ar an roghnú i liosta anuas Excel?

An ndearna tú íomháú riamh chun léim go dtí an cill in aice láimhe bunaithe ar an roghnú i liosta anuas in Excel? Mar shampla, anseo tá liosta anuas agam i gcill C1 a chuimsíonn ainmneacha na seachtaine, is é colún A liosta na ndátaí, agus is é colún B liosta na n-amanna. Anois nuair a roghnaíonn mé ainm i rith na seachtaine ón liosta anuas, mar shampla, Déardaoin, léimeann an cúrsóir go B5 atá cóngarach don Déardaoin i gcolún A. In Excel, níl aon ghné ionsuite ann chun an tasc seo a réiteach, ach le is féidir leis an gcód cumhachtach VBA.

Léim go cill in aice láimhe bunaithe ar luach sa liosta anuas de réir VBA

Léim go cill in aice láimhe bunaithe ar luach sa liosta anuas de réir VBA

1. Roghnaigh lá is mian leat a úsáid ón liosta anuas, ansin brúigh Alt + F11 eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. cliceáil Ionsáigh > Modúil, greamaigh thíos an cód leis an Modúil.

VBA: Léim go cill in aice láimhe bunaithe ar luach

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. Brúigh F5 eochair, ansin léimeann an cúrsóir go dtí an cill in aice láimhe bunaithe ar an luach sa liosta anuas.

Nóta:

Sa chód VBA, is é A2: A8 an liosta ina bhfuil na luachanna a mheaitseálann leis na luachanna ar an liosta anuas, is féidir leat an tagairt seo a athrú de réir mar is gá duit.