MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

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

    Compartilhe

    jefer.pralon
    Novato
    Novato

    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

    Mensagem  jefer.pralon em Seg 21 Mar 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
    Developer
    Developer

    Respeito às Regras 100%

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

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

    Mensagem  Fernando Bueno em Sab 09 Abr 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
    [Você precisa estar registrado e conectado para ver esta imagem.]

    jefer.pralon
    Novato
    Novato

    Respeito às Regras 100%

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

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

    Mensagem  jefer.pralon em Seg 06 Jun 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.

      Data/hora atual: Sab 03 Dez 2016, 02:26