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

    [Resolvido]O Código VBA não roda a Macro sim.

    avatar
    berninirobs
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 122
    Registrado : 14/09/2012

    [Resolvido]O Código VBA não roda a Macro sim. Empty [Resolvido]O Código VBA não roda a Macro sim.

    Mensagem  berninirobs 26/8/2021, 14:13

    Bom dia para todos.
    Tenho um problema com um código simples aplicado ao botão para a abertura de formulários ou relatório que já usei em vários bancos e nunca deu dor de cabeça, seria o seguinte:

    Private Sub Comando105_Click()
    DoCmd.OpenForm "MeuForm", acNormal, , "MeuCampo =" & Me!MeuCampo
    End Sub

    Resultado: abre o formulário em branco como se não tivesse encontrado o campo relacionado.

    Se ao mesmo botão aplico a macro:

    Condição Where: [MeuCampo]=Formulários!MeuForm!MeuCampo

    Resultado: o formulário abre corretamente.

    Os campo das duas tabelas relacionadas um para muitos são Texto, tamanho do campo: 20.
    A tabela foi elaborada no tópico:

    https://www.maximoaccess.com/t39685-resolvidonumero-de-protocolo-com-data-do-dia-mais-uma-numeracao-automatica-sequencial-que-no-dia-seguinte-recomece-por-001

    Muito obrigado.
    avatar
    berninirobs
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 122
    Registrado : 14/09/2012

    [Resolvido]O Código VBA não roda a Macro sim. Empty Re: [Resolvido]O Código VBA não roda a Macro sim.

    Mensagem  berninirobs 26/8/2021, 14:59

    Acho que consegui o recorde do tópico com a solução mais rápida da historia do MaxinoAccess.

    Simplesmente transformei a macro em código:

    DoCmd.OpenReport "MeuReport", acViewReport, "", "[MeuCampo]=[Forms]![MeuForm]![MeuCampo]", acNormal

    Código muito diferente daquele que eu estava utilizando.

    Peço desculpa.

    Mesmo assim, obrigado!

      Data/hora atual: 22/9/2021, 23:41