Note: The other languages of the website are Google-translated. Back to English

Hogyan állíthatjuk be a cellák vagy feloldott cellák tabulátum sorrendjét az Excelben?

Tegyük fel, hogy be kell állítania a tabulátorok sorrendjét a saját definiált celláihoz, például a Tab billentyű lenyomásával a B5 cellából C6-ba, C6-ból D7-be, D7-ből E8-ba lép, majd visszatér B5-be, amikor elhagyja a munkalap E8-as celláját. ahogy az alábbi képernyőképen látható. Hogyan lehet elérni? Ez a cikk egy VBA-módszert kínál Önnek.

Állítsa be a cellák vagy a feloldott cellák tabulációs sorrendjét VBA kóddal


Állítsa be a cellák vagy a feloldott cellák tabulációs sorrendjét VBA kóddal

Kérjük, futtassa az alábbi VBA módszert a cellák tabulátum sorrendjének beállításához a normál munkalapon vagy a zárolt cellák zárolt sorrendjének a védett munkalapon.

1. A munkalapon meg kell adnia a fülek sorrendjét, kattintson a jobb gombbal a lap fülre, majd kattintson a gombra Kód megtekintése a helyi menüből.

2. Ban,-ben Microsoft Visual Basic for Applications ablakba másolja és illessze be az alábbi VBA kódot a Kód ablak.

VBA-kód: A cellák vagy a feloldott cellák tabulációs sorrendjének beállítása

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim tabArray As Variant
    Dim i As Long
    tabArray = Array("B5", "C6", "D7", "E8")
    Application.ScreenUpdating = False
    For i = LBound(tabArray) To UBound(tabArray)
        If tabArray(i) = Target.Address(0, 0) Then
            If i = UBound(tabArray) Then
                Me.Range(tabArray(LBound(tabArray))).Select
            Else
                Me.Range(tabArray(i + 1)).Select
            End If
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

Megjegyzések:

1) A kódban a B5, C6, D7, E8 a beviteli cellák sorrendje, és a cellacím nagybetűjét kell használnia. Az igényei alapján megváltoztathatja őket.
2) A védett munkalaphoz a beviteli cellákat fel kell oldani.

3. megnyomni a más + Q gombok a Microsoft Visual Basic for Applications ablak.

Ezentúl az adatok B5-be történő bevitele után a kurzor a Tab vagy az Enter billentyű lenyomásával a C6-hoz megy, majd a C7-ból való kilépéskor a D6-re lép, majd az aktuális munkalapon a D7, E8-ra lép.


Kapcsolódó cikkek:


A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
officetab alja
A megjegyzések rendezése szerint
Hozzászólások (14)
Még nincs értékelés. Legyen Ön az első, aki értékel!
A weboldal moderátora ezt a megjegyzést minimalizálta
Használható ezzel a tabulátor kényszerítésére a munkalap következő zárolatlan cellájára? Például szükségem van az operátorra, hogy adatokat írjon be (beolvassa) az A15-ös cellába, majd lépjen át a C15-re, majd az E15-re, majd a G15-re (ami a sor vége), majd térjen vissza a következő cellába. sor, A16, és ismételje meg a sorozatot. Kényszerítenem kell ezt a mintát, mivel egyes operátorok tabulátorra programozott szkennereket használtak, mások pedig belépésre. Kösz!!
A weboldal moderátora ezt a megjegyzést minimalizálta
Lehetséges-e ugyanazt a kódot használni a tabulátor kényszerítésére az egyes sorok között minden nem védett cellában? A tabulátorral az A15-ös cellától kezdve kell lépnem, majd a következő nem védett cellára (C15), majd az E15-re, majd a G15-re lépnem. Ha itt vagyok, a tabulátorral A16-ra kell lépnem, és meg kell ismételni a folyamatot az űrlap hátralévő részében. Azért van erre szükségem, mert az adatokat vonalkód-leolvasó írja be, és egyesek tabulátorra, mások bevitelre vannak programozva. Köszönjük a segítséget ebben. Spinaz
A weboldal moderátora ezt a megjegyzést minimalizálta
Üdvözöljük, és köszönjük a VBA kódot, amellyel beállíthatja a tabulátorok sorrendjét egy védett lapon, ahol az űrlapvezérlő címkék és az űrlapvezérlő legördülő listák feloldva vannak, és a felhasználó lapozhat és kitöltheti az információkat egy címkében, valamint a lapozáskor a egy legördülő listában válassza ki az utasítások által neki adott tételek számát, és előrehaladtam a kóddal. Eleinte csak az egyes címkeűrlap-vezérlőket tudtam átlapozni, mostanában néha a legördülő listákra ütöttem. Nagyon örülnék egy bemutatónak arról, hogyan kell csinálni
A weboldal moderátora ezt a megjegyzést minimalizálta
A felsorolt ​​sorrendben az Excel VBA kód nélkül működik. Hadd menjenek hátra, akkor kapsz valamit.
A weboldal moderátora ezt a megjegyzést minimalizálta
Először válassza ki azokat a cellákat, amelyeket nem szeretne védeni.

Amikor védi a munkalapot, automatikusan beállítja a tabulátorok sorrendjét a nem védett celláknak megfelelően. A tabulátor balról jobbra halad előre, és fentről lefelé; Shift+Tab vissza jobbról balra és lentről felfelé.
A weboldal moderátora ezt a megjegyzést minimalizálta
Kedves Evan!
Köszönöm a megosztást.
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszönjük a kódot a rendelés leadásakor. Egy vonalkód-információkat beíró táblázaton dolgozom, és 300 cellára kell kiterjednem, és a program csak 142 cellát enged meg. Van mód még hozzáadni, hogy elérjem a 300-at?



Kösz
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia Jeanne,
Köszönöm a megjegyzést.
De a kódot nem lehet az Ön igényeinek megfelelően optimalizálni. Sajnálom az esetet.
A weboldal moderátora ezt a megjegyzést minimalizálta
No me funcionó, lo coloqué en la hoja de trabajo, debe haber algún error, me podrían ayudar, necesito implementarlo en mi trabajo,

Atte,

Collins Neptali Arráiz López
A weboldal moderátora ezt a megjegyzést minimalizálta
Helló! Van rá mód, hogy egyszerűen csak az Enter billentyűt lenyomja anélkül, hogy bármit is megadna, és a következő kiválasztásra kerülhet?
A weboldal moderátora ezt a megjegyzést minimalizálta
Helló! Új itt A VBA kód addig működik, amíg meg nem nyomok egy Pull Down Boxot, a kiválasztásnál az elsőhöz jutok, megnyomom a Tab-ot, és egy zárolt cellába kerül. Úgy működik, mint egy cella, amelybe nem adtam meg adatokat. javaslatokat? GlennD24
A weboldal moderátora ezt a megjegyzést minimalizálta
Olá, o código VBA para definir a ordem das células desejadas funcionou perfeitamente. Eu percebi que para que ele funcione, é necessário entrar com um dado na célula e pressionar TAB ou ENTER.
PERGUNTA: Você tem como fazer este código percorrer todas as células (no meu caso são 31, sendo algumas vazias e outras com valores padrão) sem ter que entrar com dados nelas, somente pressionando TAB ou ENTER. Como eu tenho algumas células vazias e outras com valores, por padrão, eu gostaria de percorrer as células sem precisar entrar com dados em todas elas novamente, mas, somente alterando as células que forem preciso alterar.att

A szöveget a Google Fordító fordította
Helló, a VBA kód a kívánt cellák sorrendjének beállításához tökéletesen működött. Rájöttem, hogy a működéshez adatokat kell bevinni a cellába, és le kell nyomni a TAB vagy az ENTER billentyűt.
KÉRDÉS: Megteheti, hogy ez a kód az összes cellán átmenjen (esetemben 31 van, némelyik üres, van, amelyik alapértelmezett értékkel rendelkezik), anélkül, hogy adatot kellene bevinni ebbe, csak nyomja meg a TAB vagy az ENTER billentyűt. Mivel vannak üres celláim, mások pedig értékekkel rendelkeznek, ezért alapértelmezés szerint úgy szeretnék váltani a cellák között, hogy ne kelljen újra megadnom az összes adatot, hanem csak azokat a cellákat módosítanám, amelyeket módosítanom kell.att

A weboldal moderátora ezt a megjegyzést minimalizálta
Bemásoltam a kódját a munkalapomba, de amint bezárom, majd újra megnyitom, hogy újra felhasználhassam, a kód eltűnt. Hogyan menthetem el ezt?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia Anita,
Ha meg szeretné őrizni a VBA-kódot a szolgáltatások használatához, a VBA-kód hozzáadása után mentse el a munkafüzetet an Excel makró-kompatibilis munkafüzet az alábbi képernyőképen látható módon. Ezután használja az újonnan mentett fájlt a jövőben.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/Excel_macro-enabled_workbook.png
Még senki sem írt megjegyzést
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi