Como avançar automaticamente para a célula seguinte após inserir dados no Excel?
Neste artigo, revelo truques para mover automaticamente o cursor para a célula seguinte e introduzir o Número de Sequência no Excel sem precisar de premir a tecla Enter.
Preencher automaticamente uma série de 4 dígitos com Kutools para Excel ![]()
Avançar automaticamente para a próxima A célula à direita após introduzir um número de 4 dígitos sem premir a tecla Enter com VBA
Aqui está um código VBA que o ajuda a avançar automaticamente para a próxima célula à direita após introduzir um número de 4 dígitos, sem precisar de premir a tecla Enter.
1. Prima Alt + F11 para abrir a janela Microsoft Visual Basic para Aplicações.
2. Clique em Inserir > Módulo e cole o seguinte código VBA no script do Módulo. Veja a captura de ecrã:
VBA: Avance automaticamente para a próxima célula à direita após introduzir um número de 4 dígitos.
Sub FourCharEntry1()
'UpdatebyExtendoffice20160614
Dim xStr As String
Dim I As Integer
Dim K As Integer
xStr = Application.InputBox("Enter string", "Kutools for Excel", , , , , , 2)
K = 0
Application.ScreenUpdating = False
For I = 1 To Len(xStr) Step 4
ActiveCell.Offset(0, K) = "'" & Mid(xStr, I, 4)
K = K + 1
Next
Application.ScreenUpdating = True
End Sub 
3. Prima a tecla F5 para executar o código e aparecerá uma caixa de diálogo Kutools para Excel, onde poderá introduzir números consecutivos sem quaisquer separadores. Veja a captura de ecrã:
4. Clique em OK. Agora, cada grupo de 4 dígitos foi colocado numa célula, da esquerda para a direita.
Dica: Se pretender introduzir números com 5, 6… dígitos numa célula, pode alterar o 4 para 5, 6 ou outro valor no código.
Preencher automaticamente uma série de 4 dígitos com Kutools para Excel
Com o Kutools para Excel – uma ferramenta prática –, pode preencher automaticamente séries numéricas num intervalo sem precisar de premir a tecla Enter, graças à sua funcionalidade Inserir Número de Sequência.
Após instalar gratuitamenteKutools para Excel, siga os passos abaixo:
1. Selecione a coluna ou linha que pretende preencher com uma série e clique em Kutools > Inserir > Inserir Número de Sequência. Veja a captura de ecrã:
2. Na caixa de diálogo Inserir Número de Sequência, clique em Novo para expandir a caixa de diálogo. Veja a captura de ecrã:
3. Em seguida, especifique a série conforme necessário. Veja a captura de ecrã:
4. Clique em Adicionar > Preencher Intervalo, e o intervalo selecionado será preenchido automaticamente com Números Consecutivos.
Dica: Com a funcionalidade Inserir Número de Sequência, também pode inserir séries repetidas. Ative a opção Número Final na caixa de diálogo, introduza o número final pretendido na caixa de texto à direita e os números da série serão preenchidos repetidamente a cada 10 números. Veja a captura de ecrã:
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos