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

    Mostrar mensagem quando campo consulta não tem o valor procurado

    avatar
    jefer.pralon
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 04/09/2014

    Mostrar mensagem quando campo consulta não tem o valor procurado Empty Mostrar mensagem quando campo consulta não tem o valor procurado

    Mensagem  jefer.pralon 21/3/2016, 18:26

    Boa tarde!

    Gostaria de uma ajuda no seguinte sentido: criei um formulário atrelado a uma consulta e nesta consulta há um campo que se chama "nome", neste coloquei o seguinte critério: (Como "*" & [Digite o nome que deseja consultar] & "*") para que pudesse pesquisar por qualquer parte do nome, porém quando o nome procurado não existe o formulário abre somente com o pano de fundo, sem nenhum campo.

    Gostaria de saber como fazer para que fosse exibida uma mensagem avisando que não há o nome procurado.

    Fico no aguardo e agradeço a atenção dos amigos.

    Obs.: sou iniciante.
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    Mostrar mensagem quando campo consulta não tem o valor procurado Empty Re: Mostrar mensagem quando campo consulta não tem o valor procurado

    Mensagem  Fernando Bueno 9/4/2016, 07:05

    Bom dia, coloque no evento Ao Abrir do formulário

    Código:
    Private Sub Form_Open(Cancel As Integer)
    If Form.RecordsetClone.RecordCount = 0 Then
      MsgBox "Sem registros", vbExclamation, "Atenção"
      DoCmd.Close acForm, "Seu_Formulario"
      Exit Sub
    End If
    End Sub


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    Mostrar mensagem quando campo consulta não tem o valor procurado 16rzeq
    avatar
    jefer.pralon
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 04/09/2014

    Mostrar mensagem quando campo consulta não tem o valor procurado Empty Re: Mostrar mensagem quando campo consulta não tem o valor procurado

    Mensagem  jefer.pralon 6/6/2016, 18:58

    Olá Fernando Bueno!

    Obrigado pela ajuda. Resolveu o meu problema.

    Desculpe não ter agradecido antes, mas foi porque eu fiquei um tento sem acessar devido a problemas particulares.

    Abraço.

    Conteúdo patrocinado


    Mostrar mensagem quando campo consulta não tem o valor procurado Empty Re: Mostrar mensagem quando campo consulta não tem o valor procurado

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 15:33