Como inserir automaticamente uma nova linha em branco ao clicar num botão de comando no Excel?
Em muitos casos, pode ser necessário inserir uma nova linha em branco numa posição específica da sua folha de cálculo. Neste artigo, mostramos-lhe como inserir automaticamente uma linha em branco ao clicar num botão de comando no Excel.
Inserir automaticamente uma nova linha em branco através de um botão de comando
Inserir automaticamente uma nova linha em branco através de um botão de comando
Pode executar o seguinte código VBA para inserir uma nova linha em branco ao clicar num botão de comando. Siga estes passos:
1. Em primeiro lugar, tem de inserir um botão de comando. Clique em Programador > Inserir > Botão de Comando (Controlo ActiveX). Veja a captura de ecrã:
2. De seguida, desenhe um botão de comando na folha de cálculo onde pretende adicionar novas linhas, clique com o botão direito do rato no botão de comando e selecione Propriedades no menu de contexto.
3. Na caixa de diálogo Propriedades, introduza o texto de exibição do botão de comando na caixa Legenda, no separador Categorizado, e depois feche a caixa de diálogo.
Pode verificar que o Texto de Exibição do botão de comando foi alterado, conforme ilustrado na seguinte captura de ecrã.
4. Clique novamente com o botão direito do rato no botão de comando e, em seguida, selecione Ver Código no menu de contexto.
5. Será então aberta a janela do Microsoft Visual Basic para Aplicações. Na janela Código, substitua o código original pelo código VBA abaixo.
Código VBA: Inserir automaticamente uma nova linha em branco através de um botão de comando
Private Sub CommandButton1_Click()
Dim rowNum As Integer
On Error Resume Next
rowNum = Application.InputBox(Prompt:="Enter Row Number where you want to add a row:", _
Title:="Kutools for excel", Type:=1)
Rows(rowNum & ":" & rowNum).Insert Shift:=xlDown
End SubNota: No código, CommandButton1 é o nome do botão de comando que criou.
6. Prima simultaneamente as teclas Alt + Q para fechar a janela do Microsoft Visual Basic para Aplicações. Desative também o Modo de Estrutura no separador Programador.
7. Clique no botão de comando inserido e surgirá a caixa de diálogo Kutools para Excel. Introduza o número da linha onde pretende adicionar uma nova linha em branco e, em seguida, clique no botão OK. Veja a captura de ecrã:
É então inserida uma nova linha em branco na posição especificada da sua folha de cálculo, conforme ilustrado na seguinte captura de ecrã, mantendo a formatação das células da linha acima.
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Artigos relacionados:
- Como utilizar um botão de comando para guardar a folha de cálculo ativa como ficheiro PDF no Excel?
- Como formatar uma célula para que pareça um botão 3D no Excel?
- Como ocultar ou mostrar um botão de comando com base num valor específico de uma célula no Excel?
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