Pessoal. Criei o seguinte código. Private Sub CommandButton1_Click()
Dim magia As String
magia = InputBox("Acrescentar Penalidade")
Range("BP25").Value = magia
End Sub Ele cadastra um valor em uma célula do excel. O que eu preciso é que usando o mesmo botão, eu possa cadastrar outro valor da linha de baixo (Sem substituir a linha de cima)... Obrigado!