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. 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