MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Alterar registro no VBA 2010

    Compartilhe

    eduardo freitas
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 16/10/2015

    Alterar registro no VBA 2010

    Mensagem  eduardo freitas em Sex 16 Out 2015, 02:58

    Boa Noite a Todos

    Me chamo Eduardo Freitas e estou com um problema que não consigo resolver
    criei todo um formulário VBA 2010 e o unico botão que eu não consigo colocar para funcionar é ALTERAR
    o código que estou usando é esse

    Private Sub botao_alterar_Click()
    linha = 2
    If Sheets("bancodedados").Cells(linha, 1) = clientes.box_nome_cliente.Text Then
    Sheets("bancodedados").Cells(linha, 2) = clientes.box_empresa.Text
    Sheets("bancodedados").Cells(linha, 3) = clientes.box_telefone_fixo.Text
    Sheets("bancodedados").Cells(linha, 4) = clientes.box_telefone_fax.Text
    Sheets("bancodedados").Cells(linha, 5) = clientes.box_celular.Text
    Sheets("bancodedados").Cells(linha, 6) = clientes.box_endereco_web.Text
    Sheets("bancodedados").Cells(linha, 7) = clientes.box_email.Text
    Sheets("bancodedados").Cells(linha, Cool = clientes.box_observacao.Text
    Sheets("bancodedados").Cells(linha, 9) = clientes.box_registro.Text

    'mensagem após a alteração
    MsgBox "Cadastro Alterado com Sucesso !", vbInformation, "CONFIRMAÇÃO DE ALTERAÇÃO"
    ActiveWorkbook.Save

    clientes.box_nome_cliente.Text = ""
    clientes.box_empresa.Text = ""
    clientes.box_telefone_fixo.Text = ""
    clientes.box_telefone_fax.Text = ""
    clientes.box_celular.Text = ""
    clientes.box_endereco_web.Text = ""
    clientes.box_email.Text = ""
    clientes.box_observacao.Text = ""
    clientes.box_registro.Text = ""

    'colocar cursor na caixa nome
    box_registro.SetFocus

    End If
    linha = linha + 1


    End Sub


    eu preciso de ajuda

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: Alterar registro no VBA 2010

    Mensagem  Noobezinho em Sex 16 Out 2015, 11:50

    Olá Eduardo

    O nosso fórum é voltado a soluções de programação em MS Access.
    Pode ser que algum membro utilize código VBA no Excel, possa te ajudar.
    Embora a linguagem seja a mesma, o conceito é totalmente diferente.
    É aguardar para ver.

    [ ]'s

      Data/hora atual: Qua 23 Maio 2018, 23:16