MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    [Resolvido]Botão Excluir no Form

    avatar
    flecha
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 304
    Registrado : 11/01/2012

    [Resolvido]Botão Excluir no Form Empty [Resolvido]Botão Excluir no Form

    Mensagem  flecha Qua Fev 08, 2023 3:23 pm

    Olá,
    Tenho um Bd que coloquei uma dúvida aqui para o Botão Excluir.

    Voces me ajudaram e esta funcionando,
    Depois de testes notei o seguinte.

    No formulário (vivo) tem o campo  (Nome) e neste campo quando for sair do form se ele estive vazio ele informa que
    não pode ficar vazio.

    Notei que a Exclusão estava funcionando perfeitamente dede que não fosse o Último registro.
    Acontece que quando excluo o Ultimo registro ele volta para o form  parando no campo (nome)
    e ai não deixa sair! Tem que clicar em Cancelar da Mensagem para voltar ao form com o primeiro registro.

    Como posso resolver isso?

    Obrigado!
    Anexos
    [Resolvido]Botão Excluir no Form AttachmentTeste Exclui com senha.zip
    Senha para Excluir 1234
    Você não tem permissão para fazer download dos arquivos anexados.
    (101 Kb) Baixado 11 vez(es)
    marcelo marques
    marcelo marques
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1003
    Registrado : 12/04/2016

    [Resolvido]Botão Excluir no Form Empty Re: [Resolvido]Botão Excluir no Form

    Mensagem  marcelo marques Sáb Fev 11, 2023 7:57 am

    ola bom dia tenta colocar este código no evento após atualizar

    obs: troca esse campo "nome" por outro exemplo "txt_nome" porque nome é uma palavra reservada do access assim pode dar problemas no futuro


    Private Sub NOME_AfterUpdate()
    Dim retorno As Integer
    If IsNull(Me!NOME) Or Me!NOME = "" Then
    retorno = MsgBox("Você precisa preencher este campo!", vbOKCancel, "Todos os Campos são Obrigatórios")
    Cancel = True 'Cancela o evento.
    If retorno = 1 Then
    Cancel = True
    Else
    DoCmd.GoToRecord , , acFirst
    End If
    Exit Sub
    End If


    End Sub

    flecha gosta desta mensagem

    avatar
    flecha
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 304
    Registrado : 11/01/2012

    [Resolvido]Botão Excluir no Form Empty Re: [Resolvido]Botão Excluir no Form

    Mensagem  flecha Seg Fev 13, 2023 11:12 am

    cheers
    perfeito, Agora ficou como queria, essa instrução estava no evento EXIT do nome e sempre dava aquela informação
    e não achava como contornar.


    Obrigado! cheers cheers cheers

    Conteúdo patrocinado


    [Resolvido]Botão Excluir no Form Empty Re: [Resolvido]Botão Excluir no Form

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qui Out 03, 2024 8:09 am