Como usar macro para inserir linha abaixo da tabela no Excel com fórmulas retidas?

É comum adicionarmos linhas em branco na parte inferior de uma tabela especificada para expandir a tabela e adicionar novo conteúdo. Este artigo fala sobre como usar uma macro para inserir uma nova linha abaixo de uma tabela especificada e manter a fórmula da célula acima no Excel.

Use a macro para inserir a linha abaixo da tabela no Excel

Use a macro para inserir a linha abaixo da tabela no Excel

Faça o seguinte para inserir uma linha em branco abaixo de uma tabela especificada com macro.

1. aperte o outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, por favor clique inserção > Módulo para abrir a janela Módulo. Em seguida, copie e cole o código VBA abaixo na janela.

Código VBA: use macro para inserir uma linha em branco abaixo de uma tabela especificada

Sub AddRows()
'Updated by Extendoffice 2017/9/12
    Dim xLastRow As Long
    Dim xRg As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the table range you will insert blank row below:", "KuTools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xLastRow = xRg.Row + xRg.Rows.Count
    xRg.Rows(xLastRow).FillDown
    xRg.Rows(xLastRow).SpecialCells(xlCellTypeConstants).ClearContents
End Sub

3. aperte o F5 chave para executar o código. E um Kutools for Excel a caixa de diálogo for exibida, selecione o intervalo de tabela específico, você adicionará uma linha em branco abaixo e clique no botão OK botão. Veja a imagem:

Em seguida, você pode ver uma nova linha em branco adicionada na parte inferior da tabela especificada. E a fórmula na célula acima também é reservada na linha recém-inserida, conforme abaixo, veja a captura de tela mostrada: