Estou com uma dúvida um tanto quanto específica. Espero que possam me ajudar
Possuo uma planilha que contem uma tabela chamada "Atividades". Tenho alguns controles de formulário para preencher a mesma mas me surgiu a necessidade de inserir e excluir linhas dessa tabela sem interferir nas células ao seu lado. Preencher uma nova linha da tabela sem afetar as células do lado não é problema, já consegui fazer isso. O problema está sendo excluir a linha da coluna que contenha o valor adicionado (apenas o último). Segue imagens para ilustrar o que pretendo fazer.
Ao clicar no botão + de "Telefonemas Atendidos", ele adiciona uma linha na tabela "Atividades" com o texto "Atendimento de Telefone".
Gostaria de poder fazer a mesma coisa com o botão menos, ao clicar nele, a última linha contendo "Atendimento de Telefone" seja excluída (apenas o último dentro da tabela), mas de forma a não interferir nas células com o retângulo em azul.
Será que tem como? Como podem ver, já possuo um controle que consegue apagar a última linha da tabela, uso esse código para fazer isso:
Private Sub RemoveLinha_Click()
Dim i As Integer
i = ActiveSheet.ListObjects("Atividades").Range.Rows.Count
If i > 2 Then
Range("D" & i).ListObject.ListRows(i - 1).Delete
End If
End Sub
No entanto, não sei como identificar apenas o último valor contendo o texto específico para cada botão de menos que eu adicionar.