Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako hitro skočiti na sosednjo celico glede na izbiro na spustnem seznamu Excel?

Ste že kdaj imeli priložnost, da skočite na sosednjo celico, ki temelji na izboru na spustnem seznamu v Excelu? Na primer, tukaj imam spustni seznam v celici C1, ki vključuje imena dneva, stolpec A je seznam datumov, stolpec B pa seznam časov. Zdaj, ko izberem ime dneva v obliki padajočega seznama, na primer v četrtek, kazalec skoči na B5, ki je v četrtem stolpcu v stolpcu A. V Excelu ni nobene vgrajene funkcije za rešitev te naloge, ampak z močna VBA koda lahko.
doc skok po celični vrednosti 1

Skoči na sosednjo celico, ki temelji na vrednosti v padajočem seznamu s VBA


puščica modra desno mehurček Skoči na sosednjo celico, ki temelji na vrednosti v padajočem seznamu s VBA


1. Na spustnem seznamu izberite dan, ki ga želite uporabiti, nato pritisnite Alt + F11 tipke, ki omogočajo Microsoft Visual Basic za aplikacije okno.
doc skok po celični vrednosti 2

2. klik Vstavi > Moduli, prilepite spodnjo kodo na Moduli.

VBA: skok na sosednjo celico glede na vrednost

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

doc skok po celični vrednosti 3

3. Pritisnite F5 ključ, nato kazalec skoči na sosednjo celico, ki temelji na vrednosti na spustnem seznamu.
doc skok po celični vrednosti 4

Opomba:

V kodi VBA je A2: A8 seznam, ki vsebuje vrednosti, ki se ujemajo z vrednostmi na spustnem seznamu, lahko to referenco spremenite, kot je potrebno.


V tem ste morda začeli:

Izberite Specific Cells (izberite celice / vrstice / stolpce na podlagi enega ali dveh meril.)

doc izberite določene celice

Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.