Como inserir automaticamente uma nova linha em branco usando um Botão de Comando no Excel?

Em muitos casos, você pode precisar inserir uma nova linha em branco em uma posição específica da sua planilha. Neste artigo, mostraremos como inserir automaticamente uma nova linha em branco ao clicar em um Botão de Comando no Excel.

Inserir automaticamente uma nova linha em branco com o Botão de Comando

Inserir automaticamente uma nova linha em branco com o Botão de Comando

Você pode executar o seguinte código VBA para inserir uma nova linha em branco ao clicar em um Botão de Comando. Por favor, siga os passos abaixo.

1. Primeiro, você precisa inserir um Botão de Comando. Clique em Desenvolvedor > Inserir > Botão de Comando (Controle ActiveX). Veja a captura de tela:

2. Em seguida, desenhe um Botão de Comando na planilha onde deseja adicionar novas linhas, clique com o botão direito do mouse no Botão de Comando e clique em Propriedades no menu que aparece.

3. Na caixa de diálogo Propriedades, insira o texto exibido do Botão de Comando na caixa Caption sob a aba Categorizado e, em seguida, feche a caixa de diálogo.

Você pode ver que o texto exibido do Botão de Comando foi alterado conforme mostrado na captura de tela abaixo.

4. Clique novamente com o botão direito do mouse no Botão de Comando e, em seguida, clique em Visualizar Código no menu que aparece.

5. Na janela Microsoft Visual Basic for Applications, substitua o código original pelo seguinte código VBA na janela de Código.

Código VBA: Inserir automaticamente uma nova linha em branco com o 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 Sub

Observação: No código, CommanButton1 é o nome do Botão de Comando que você criou.

6. Pressione simultaneamente as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications. E desative o Modo de Design na guia Desenvolvedor.

7. Clique no Botão de Comando inserido, e uma caixa de diálogo Kutools para Excel será exibida. Insira o número da linha onde deseja adicionar uma nova linha em branco e, em seguida, clique no botão OK. Veja a captura de tela:

Então, a nova linha em branco será inserida em uma posição específica da sua planilha, conforme mostrado na captura de tela abaixo. Ela mantém a formatação de célula da célula acima.

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!

Artigos relacionados:

• Como usar o Botão de Comando para salvar a planilha ativa como arquivo PDF no Excel?
• Como formatar uma célula para parecer um botão 3D no Excel?
• Como ocultar ou exibir um Botão de Comando com base em um valor de célula específico no Excel?