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


    [Resolvido]Campo com Mensagem Automática

    avatar
    joanita
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 35
    Registrado : 26/05/2011

    [Resolvido]Campo com Mensagem Automática Empty [Resolvido]Campo com Mensagem Automática

    Mensagem  joanita em 21/10/2019, 20:55

    Boa noite,

    Pretendo criar um campo num formulário, que baseado num valor de outro campo, me devolva uma determinada mensagem (como a função se do excel). Alguém pode dar uma dica?

    Desde já muito obrigado.
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  Fernando Bueno em 22/10/2019, 00:09

    Boa noite;

    if me.SeuCampo = ValorDesejado Then
    Msgbox " sua mensagem "
    else
    end if


    .................................................................................
    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
    [Resolvido]Campo com Mensagem Automática 16rzeq
    avatar
    joanita
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 35
    Registrado : 26/05/2011

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  joanita em 22/10/2019, 13:35

    Olá Fernando,

    E se eu quiser colocar 3 mensagens?
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  Fernando Bueno em 23/10/2019, 01:09

    Boa noite;

    if me.SeuCampo = ValorDesejado Then
    Msgbox " sua mensagem "
    ElseIf me.SeuCampo = ValorDesejado Then
    Msgbox " sua mensagem "
    else
    me.SeuCampo = ValorDesejado Then
    Msgbox " sua mensagem "
    end if


    .................................................................................
    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
    [Resolvido]Campo com Mensagem Automática 16rzeq
    avatar
    joanita
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 35
    Registrado : 26/05/2011

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  joanita em 25/10/2019, 08:16

    Fernando,estou a tentar colocar esse código num evento após atualizar e não está a funcionar. O código que colocou não está completo pois não? Mesmo com a alteração colorida continua sem funcionar.

    if me.SeuCampo = ValorDesejado Then
    Msgbox " sua mensagem "
    ElseIf me.SeuCampo = ValorDesejado Then
    Msgbox " sua mensagem "
    else
    if me.SeuCampo = ValorDesejado Then
    Msgbox " sua mensagem "
    end if

    Estou a tentar colocar este código (depois de atualizar) no campo observação(1) mas neste caso, relativamente aos valores do campo qtd_embalada(2):

    if me.qtd_emb  > 0 Then
    Msgbox " em execução "
    ElseIf me.qtd_emb = 0 Then
    Msgbox " não iniciado "
    else
    If me.qtd_emb >= qtd_pedida Then
    Msgbox " concluído "
    end if
    Anexos
    [Resolvido]Campo com Mensagem Automática Attachment1.PNG
    Você não tem permissão para fazer download dos arquivos anexados.
    (8 Kb) Baixado 8 vez(es)
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  Fernando Bueno em 26/10/2019, 16:13

    Olá bom dia;

    Falta um End If no código

    if me.qtd_emb > 0 Then
    Msgbox " em execução "
    ElseIf me.qtd_emb = 0 Then
    Msgbox " não iniciado "
    else
    If me.qtd_emb >= qtd_pedida Then
    Msgbox " concluído "
    End If
    End If


    .................................................................................
    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
    [Resolvido]Campo com Mensagem Automática 16rzeq
    avatar
    joanita
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 35
    Registrado : 26/05/2011

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  joanita em 26/10/2019, 21:51

    Olá Fernando,

    Continua sem funcionar.
    Eu coloquei o código em after update...se calhar é isso que está errado. ..

    Private Sub Observação_AfterUpdate()
       If Me.Qtd_embalada > 0 Then
       MsgBox " em execução "
       ElseIf Me.Qtd_embalada = 0 Then
       MsgBox " não iniciado "
       Else
       If Me.Qtd_embalada >= qtd_pedida(PAL) Then
       MsgBox " concluído "
       End If
       End If
    End Sub
    Anexos
    [Resolvido]Campo com Mensagem Automática AttachmentCapturar.PNG
    Você não tem permissão para fazer download dos arquivos anexados.
    (6 Kb) Baixado 7 vez(es)
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1067
    Registrado : 22/11/2016

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  IvanJr. em 26/10/2019, 22:07

    Sugiro anexar seu arquivo contendo os objetos. Certamente um pequeno detalhe na sua estrutura está faltando pois o código é funcional.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    joanita
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 35
    Registrado : 26/05/2011

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  joanita em 27/10/2019, 18:27

    Caro Ivan,

    Aqui fica o link

    https://www.dropbox.com/s/6o6dkdwyr61wnnj/MM%20V2%20Local%20%282%29.accdb?dl=0

    O form é acessível através do botão "Embalagem".
    A mensagem que quero quero acrescentar é no campo "observação", dependendo dos valores apresentados no campo "qtd_embalada".
    Se conseguir ajudar, explique pf o que estava a fazer errado.
    Obrigada.
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1067
    Registrado : 22/11/2016

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  IvanJr. em 30/10/2019, 01:38

    Não baixei. Seu arquivo tem 87mb. Abra seu arquivo e use a função para compactar e reparar do access e assim fazer com que ele diminua. Após isso suba o arquivo novamente e disponibilize o link.

    Aguardo..


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    joanita
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 35
    Registrado : 26/05/2011

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  joanita em 5/11/2019, 21:31

    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1067
    Registrado : 22/11/2016

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  IvanJr. em 9/11/2019, 23:43

    Enfim entendi.

    Quando você fala em mensagem automática, nós entendemos que você quer que uma caixa de mensagem salte na tela. Todavia não é isso que você deseja. Você quer atribuir valor a um campo.

    Veja o exemplo em anexo e adapte ao seu projeto.
    Anexos
    [Resolvido]Campo com Mensagem Automática Attachmentjoanita.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (43 Kb) Baixado 10 vez(es)


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    joanita
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 35
    Registrado : 26/05/2011

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  joanita em 23/11/2019, 21:22

    Olá Ivan,

    Era mesmo isso!! Desculpe responder só agora! Muito Obrigada pela ajuda!
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1067
    Registrado : 22/11/2016

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  IvanJr. em 25/11/2019, 21:30

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado

    [Resolvido]Campo com Mensagem Automática Empty Re: [Resolvido]Campo com Mensagem Automática

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/12/2019, 15:11