MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Operador faltando

    avatar
    Peutrindade
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 26/09/2012

    Operador faltando Empty Operador faltando

    Mensagem  Peutrindade em 12/2/2020, 15:00

    Boa tarde, pessoal

    será que alguem pode me dizer que operador está faltando na expressão de evento ao clicar de um botão:

    DoCmd.OpenForm "CadTurma", , , "Cons_CadTurma.Turma = " & Me!Turma

    ???

    Agradeço
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1146
    Registrado : 13/12/2016

    Operador faltando Empty Re: Operador faltando

    Mensagem  Alexandre Fim em 12/2/2020, 17:40

    Olá Pedro,


    Código:


    'Se o campo Me!Turma form inteiro
    DoCmd.OpenForm "CadTurma", , , "Cons_CadTurma.Turma = " & Me!Turma & ""

    'Se o campo Me!Turma form texto
    DoCmd.OpenForm "CadTurma", , , "Cons_CadTurma.Turma = '" & Me!Turma & "'"



    Boa sorte.


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Operador faltando Empty Re: Operador faltando

    Mensagem  DamascenoJr. em 12/2/2020, 23:04

    Pitaco.
    Certamente o controle Me!Turma está vazio, e com isso fazendo a expressão ficar incompleta.

    Experimente
    Código:
    if isnull(me!Turma) then
        call msgbox("Controle vazio")
    else
        DoCmd.OpenForm "CadTurma", , , "Cons_CadTurma.Turma = " & Me!Turma
    end if

    Se for este o caso então garanta que o campo esteja com algum valor para que o formulário seja aberto filtrado


    .................................................................................
    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.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Operador faltando Empty Re: Operador faltando

    Mensagem  DamascenoJr. em 28/2/2020, 00:51

    Peutrindade, tudo bem? Já resolveu sua questão? Se for o caso, não esqueça de dar o tópico por resolvido.


    .................................................................................
    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.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1146
    Registrado : 13/12/2016

    Operador faltando Empty Re: Operador faltando

    Mensagem  Alexandre Fim em 28/2/2020, 13:01

    Bem observado, DamascenoJr..Obrigado


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.

      Data/hora atual: 24/9/2020, 07:00