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

Jak nastavit pořadí karet buněk nebo odemčených buněk v aplikaci Excel?

Předpokládejme, že potřebujete nastavit pořadí tabulátorů pro vlastní definované buňky, například stisknutím klávesy Tab se přesunete z buňky B5 do C6, z C6 do D7, z D7 do E8 a poté se vrátíte do B5, když opustíte buňku E8 v listu. jak je zobrazen níže uvedený snímek obrazovky. Jak toho dosáhnout? Tento článek vám poskytuje metodu VBA.

Nastavte pořadí karet buněk nebo odemčených buněk pomocí kódu VBA


Nastavte pořadí karet buněk nebo odemčených buněk pomocí kódu VBA

Spusťte níže uvedenou metodu VBA a nastavte pořadí karet buněk v normálním listu nebo odemčených buněk v chráněném listu.

1. V listu musíte nastavit pořadí karet, klikněte pravým tlačítkem na kartu listu a klikněte na Zobrazit kód z kontextové nabídky.

2. V Microsoft Visual Basic pro aplikace okno, zkopírujte a vložte níže uvedený kód VBA do Kód okno.

Kód VBA: Nastaví pořadí karet buněk nebo odemčených buněk

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

Poznámky:

1) V kódu je pořadí vstupních buněk B5, C6, D7, E8 a musíte použít velké písmeno adresy buňky. Můžete je změnit podle svých potřeb.
2) U chráněného listu musí být vstupní buňky odemčeny.

3. zmáčkni Další + Q klávesy pro zavření Microsoft Visual Basic pro aplikace okno.

Od této chvíle po zadání dat v B5 přejde kurzor na C6 stisknutím klávesy Tab nebo Enter, poté přejde na D7 při opuštění C6 a poté se přesune na D7, E8 v aktuálním listu.


Související články:


Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
officetab dno
Komentáře (14)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Lze to použít k vynucení tabulátoru k další odemčené buňce v listu? Potřebuji například, aby operátor zadal (naskenoval) data do buňky A15 a pak by se měla přepnout na C15, pak E15, pak G15 (což je konec řádku), pak se vrátit do první buňky v další řádek, A16 a opakujte sekvenci. Potřebuji vynutit tento vzor, ​​protože někteří operátoři používali skenery naprogramované na tabulátor a jiní jsou naprogramováni na vstup. Dík!!
Tento komentář byl moderátorem webu minimalizován
Je možné použít stejný kód k vynucení tabulátoru přes každý řádek do každé nechráněné buňky? Potřebuji tabulátor počínaje buňkou A15 a poté přejít na další nechráněnou buňku (C15), poté E15 a poté G15. Jakmile jsem tady, musím přejít na A16 a opakovat proces pro zbytek formuláře. Důvod, proč to potřebuji, je ten, že data jsou zadávána skenerem čárových kódů a některá jsou naprogramována na kartu a jiná na zadávání. Děkujeme za vaši pomoc. Spinaz
Tento komentář byl moderátorem webu minimalizován
Dobrý den a děkujeme za kód VBA pro nastavení pořadí tabelátorů na chráněném listu, kde jsou odemknuté popisky ovládacích prvků formuláře a rozevírací seznamy ovládacích prvků formuláře a uživatel může procházet a vyplňovat informace na štítku a při přechodu pomocí tabelátoru na v rozevíracím seznamu vyberte počet položek, které mu dávají pokyny, a s vaším kódem jsem pokročil. Zpočátku jsem mohl pouze procházet jednotlivými ovládacími prvky formuláře štítků, nyní jsem někdy narazil na rozevírací seznamy. Opravdu bych si užil turial o tom, jak to udělat
Tento komentář byl moderátorem webu minimalizován
S pořadím, které jste uvedli, se Excel obejde bez kódu VBA. Nechte je jít pozpátku, pak něco máte.
Tento komentář byl moderátorem webu minimalizován
Nejprve vyberte, které buňky chcete mít nechráněné.

Když chráníte svůj list, automaticky nastaví pořadí karet podle vašich nechráněných buněk. Přejde tabulátorem vpřed zleva doprava a shora dolů; Shift+Tab vzad zprava doleva a zdola nahoru.
Tento komentář byl moderátorem webu minimalizován
milý Evane,
Děkujeme vám za sdílení.
Tento komentář byl moderátorem webu minimalizován
Děkujeme za kód při zadání objednávky. Pracuji na tabulkovém procesoru a zadávám informace o čárových kódech a potřebuji rozložit až 300 buněk a program mi umožňuje zadat pouze 142 buněk. Existuje způsob, jak přidat další, abych mohl získat až 300?



Díky
Tento komentář byl moderátorem webu minimalizován
ahoj Jeanne,
Díky za váš komentář.
Kód však nelze optimalizovat tak, aby vyhovoval vašim potřebám. Omlouvám se za to.
Tento komentář byl moderátorem webu minimalizován
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
Tento komentář byl moderátorem webu minimalizován
Dobrý den, existuje způsob, jak jednoduše stisknout enter bez zadávání čehokoli a nechat to přejít na další výběr?
Tento komentář byl moderátorem webu minimalizován
Dobrý den, zde je novinka Kód VBA funguje, dokud nenarazím na Pull Down Box, dostanu se na první, když udělám svůj výběr, stisknu Tab a přesune se do uzamčené buňky, Chová se jako buňka, do které jsem nezadal žádná data. návrhy? GlennD24
Tento komentář byl moderátorem webu minimalizován
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 outs 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 alteratar forem

Text přeložil Google Translator
Dobrý den, VBA kód pro nastavení pořadí požadovaných buněk fungoval perfektně. Uvědomil jsem si, že aby to fungovalo, je nutné zadat data do buňky a stisknout TAB nebo ENTER.
OTÁZKA: Tento kód můžete nechat projít všemi buňkami (v mém případě je jich 31, některé jsou prázdné a jiné s výchozími hodnotami), aniž byste do nich museli zadávat data, stačí stisknout TAB nebo ENTER. Protože mám některé prázdné buňky a jiné s hodnotami, ve výchozím nastavení bych chtěl procházet buňky, aniž bych musel znovu zadávat data do všech, ale pouze měnit buňky, které potřebuji změnit.att

Tento komentář byl moderátorem webu minimalizován
Zkopíroval jsem váš kód do svého listu, ale jakmile jej zavřu a znovu otevřu, abych jej mohl znovu použít, kód je pryč. Jak to uložím?
Tento komentář byl moderátorem webu minimalizován
Ahoj Anito,
Pokud si chcete ponechat kód VBA pro použití funkcí, po přidání kódu VBA uložte sešit jako soubor Sešit Excel s podporou maker jak je znázorněno na snímku obrazovky níže. Poté použijte nově uložený soubor v budoucnu.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/Excel_macro-enabled_workbook.png
Zatím zde nejsou žádné komentáře

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL