Les galetes ens ajuden a lliurar els nostres serveis. En utilitzar els nostres serveis, accepteu el nostre ús de cookies.
Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com configurar l'ordre de les fitxes a quadres de text d'Excel?

Suposant que heu inserit diverses caselles de text (control ActiveX) al vostre full de càlcul. Normalment, quan acabeu d'editar un quadre de text, heu de moure el cursor a l'altre quadre de text i feu clic per activar-lo per introduir el contingut. Tanmateix, aquest mètode sembla tediós per a múltiples quadres de text. Hi ha alguna manera de canviar fàcilment entre les caselles de text només amb una tecla d'accés directe? En realitat, la tecla Tab pot ajudar-vos. Aquest mètode us mostrarà un mètode per definir l'ordre de les fitxes a les caselles de text amb més detall.

Estableix l'ordre de la pestanya en quadres de text amb codi VBA


Estableix l'ordre de la pestanya en quadres de text amb codi VBA


Introduïu el codi VBA següent per establir l'ordre de les fitxes a quadres de text d'Excel.

1. Si us plau, seleccioneu el full de treball que conté diverses caselles de text per definir l'ordre de les fitxes. Feu clic amb el botó dret a la fitxa del full i seleccioneu Veure codi des del menú del botó dret. Mostra la captura de pantalla:

3. A l'obertura Microsoft Visual Basic per a aplicacions finestra, copieu i enganxeu per sota del codi VBA a la finestra del codi.

Codi VBA: estableixi l'ordre de la pestanya en quadres de text d'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

Nota: En el codi, TextBox1, TextBox2i TextBox3 són les caixes de text que configurareu l'ordre de les fitxes. Canvieu-los com necessiteu.

4. Premeu el botó Alt + Q tecles simultàniament per tancar la Microsoft Visual Basic per a aplicacions finestra.

A partir d'ara, quan editeu a textbox1 i premeu la tecla Tab, el cursor es mourà immediatament al quadre de text 2. I premeu la tecla Tab a textbox2 mourà el cursor al textbox3.


Article relacionat



Eines de productivitat recomanades

Pestanya d'Office

estrella d'or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d'or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d'or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a Excel

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.