Jak nastavit pořadí karet na textová pole v aplikaci Excel?
Předpokládejme, že jste do listu vložili více textových polí (ovládací prvek ActiveX). Po dokončení úprav textového pole musíte obvykle přesunout kurzor do druhého textového pole a klepnutím jej aktivovat pro zadávání obsahu. Tato metoda se však zdá nudná pro více textových polí. Existuje nějaký způsob, jak snadno přepínat mezi textovými poli pouze pomocí klávesové zkratky? Ve skutečnosti vám může pomoci klávesa Tab. Tato metoda vám ukáže metodu podrobného nastavení pořadí karet na textová pole.
Nastavit pořadí karet na textová pole s kódem VBA
Nastavit pořadí karet na textová pole s kódem VBA
Chcete-li nastavit pořadí karet na textová pole v aplikaci Excel, použijte níže uvedený kód VBA.
1. Vyberte list, který obsahuje několik textových polí, pro která je třeba nastavit pořadí karet. Klepněte pravým tlačítkem na kartu listu a vyberte Zobrazit kód z nabídky pravého tlačítka myši. Viz screenshot:
3. V otvoru Microsoft Visual Basic pro aplikace zkopírujte a vložte pod kód VBA do okna Kód.
Kód VBA: Nastaví pořadí karet na textová pole v aplikaci Excel
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then
TextBox2.Activate
End If
End Sub
Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then
TextBox3.Activate
End If
End Sub
Private Sub TextBox3_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then
TextBox1.Activate
End If
End Sub
Poznámka: V kódu, Textové pole 1, Textové pole 2, a Textové pole 3 jsou textová pole, na která nastavíte pořadí karet. Změňte je prosím podle potřeby.
4. zmáčkni Další + Q současně zavřete Microsoft Visual Basic pro aplikace okno.
Od této chvíle se při úpravách v textovém poli 1 a stisknutí klávesy Tab kurzor okamžitě přesune do textového pole 2. A stisknutím klávesy Tab v textovém poli 2 přesunete kurzor na textové pole3.
Související článek
- Jak nastavit pořadí karet buněk nebo odemčených buněk v aplikaci Excel?
- Jak automaticky vybrat text textového pole, když je vybrán v aplikaci Excel?
- Jak automaticky vyplnit textové pole při psaní v aplikaci Excel?
- Jak zřetězit texty více buněk do textového pole v aplikaci Excel?
- Jak zakázat úpravy v textovém poli, aby se zabránilo vstupu uživatele do aplikace Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
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!