Guru do Excel e Power BI

Enviado: **19 Jun 2016 às 23:01**

Em um exemplo. Eu teria uma planilha com um userform Nele possui uma textbox "txtboxnome" ao clicar em um botão com nome "btsalvar" ele salva na ultima celula sem texto da coluna A.

Que códigos eu usaria nesse "btsalvar" neste caso?

Enviado: **20 Jun 2016 às 00:36**

Boa noite,

seria assim:

Código: Selecionar todos

Private Sub cmdSALVAR_Click()
    ActiveWorkbook.Sheets("Plan1").Activate
    Range("A1").Select
    Do
    If IsEmpty(ActiveCell) = False Then
        ActiveCell.Offset(1, 0).Select
    End If
    Loop Until IsEmpty(ActiveCell) = True
    ActiveCell.Value = txtNome.Value
        
    Range("A1").Select
    
   txtNome.Value = ""
    
End Sub

Att

Guru do Excel e Power BI

Gravar dados textbox na planilha ao apertar botão "Salvar"

Gravar dados textbox na planilha ao apertar botão "Salvar"

Re: Gravar dados textbox na planilha ao apertar botão "Salva