Aula 1 Cadastro VBA
Amigos para saber acesse
Zé das Planilhas veja o video faça o Download da planilha e seja feliz.
Abaixo o código que eu utilizei.
Zé das Planilhas veja o video faça o Download da planilha e seja feliz.
Abaixo o código que eu utilizei.
Private Sub CommandButton1_Click()
linha = 2
Do Until Sheets("Fornecedores").Cells(linha, 1) = ""
linha = linha + 1
Loop
Sheets("Fornecedores").Cells(linha, 1) = linha - 1
Sheets("Fornecedores").Cells(linha, 2) = TextBox2
Sheets("Fornecedores").Cells(linha, 3) = TextBox3
MsgBox "Cadastro realizado com sucesso", vbOKOnly, TextBox3.Text
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
End Sub
Comentários
Postar um comentário