Como definir a ordem de tabulação para caixas de texto no Excel?

Suponha que você tenha inserido várias caixas de texto (Controle ActiveX) na sua planilha. Normalmente, ao terminar de editar uma caixa de texto, você precisa mover o cursor para dentro de outra caixa de texto e clicar para ativá-la antes de inserir conteúdo. No entanto, esse método pode parecer tedioso quando há várias caixas de texto. Existe alguma maneira de alternar facilmente entre as caixas de texto apenas com uma tecla de atalho? Na verdade, a tecla Tab pode ajudar você. Este método mostrará em detalhes como definir a ordem de tabulação para caixas de texto.

Definir a ordem de tabulação para caixas de texto com código VBA

Definir a ordem de tabulação para caixas de texto com código VBA

Por favor, aplique o seguinte código VBA para definir a ordem de tabulação para caixas de texto no Excel.

1. Por favor, selecione a planilha que contém várias caixas de texto para as quais você precisa definir a ordem de tabulação. Clique com o botão direito do mouse na guia da planilha e selecione Visualizar Código no menu de contexto. Veja a captura de tela:

3. Na janela Microsoft Visual Basic for Applications que abrir, copie e cole o seguinte código VBA na janela Código.

Código VBA: Definir a ordem de tabulação para caixas de texto no 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

Observação: No código, TextBox1, TextBox2 e TextBox3 são as caixas de texto para as quais você definirá a ordem de tabulação. Altere-os conforme necessário.

4. Pressione simultaneamente as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications.

A partir de agora, ao editar na caixa de texto 1 e pressionar a tecla Tab, o cursor irá imediatamente para a caixa de texto 2. E ao pressionar a tecla Tab na caixa de texto 2, o cursor será movido para a caixa de texto 3.

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!

Artigo relacionado

• Como definir a ordem de tabulação das células ou células desbloqueadas no Excel?
• Como selecionar automaticamente o texto de uma caixa de texto quando ela é selecionada no Excel?
• Como autocompletar uma caixa de texto ao digitar no Excel?
• Como concatenar textos de várias células em uma caixa de texto no Excel?
• Como desativar a edição em uma caixa de texto para evitar a entrada do usuário no Excel?