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

    Erro na consulta quando se seleciona mais de um item na lista

    blsnogueira
    blsnogueira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 16/09/2012

    Erro na consulta quando se seleciona mais de um item na lista Empty Erro na consulta quando se seleciona mais de um item na lista

    Mensagem  blsnogueira Dom 22 Nov 2015, 9:59 pm

    Boa noite,
    Venho mais uma vez, recorrer a ajuda de vocês.

    Tenho um relatório com base em uma consulta de referência cruzada.
    Esta consulta tem como parâmetro a lista de colaboradores, o mês e o ano de um formulário.

    Se eu seleciono um item da lista de colaboradores ela funciona perfeitamente...
    O problema ocorre quando eu preciso selecionar mais de um item na lista de colaboradores, que não reconhece como válido e retorna com erro.

    É possível fazer este tipo de consulta?

    coloquei o BD no link abaixo para facilitar a compreensão.

    https://drive.google.com/file/d/0B-ucHSo98SDISDFtN3lFN2VKMGc/view?usp=sharing

    Desde já agradeço a ajuda de todos!
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1314
    Registrado : 21/01/2012

    Erro na consulta quando se seleciona mais de um item na lista Empty Re: Erro na consulta quando se seleciona mais de um item na lista

    Mensagem  Cláudio Más Dom 29 Nov 2015, 5:20 pm

    Olá,

    Se ainda procura uma solução, acho que isso funciona:

    1- crie uma consulta com o nome de "consColaboradores", pode ter apenas Código e Tradutor;
    2- substitua a tabela "Colaboradores" por esta consulta em "ProdutividadeInternaAnalitico";
    3- retire o filtro do colaborador em "ProdutividadeInternaAnalitico";
    4- retire o parâmetro "[forms]![frmReports_producao]![Filtro]" da lista de parâmetros em "ProdutividadeInternaAnalitico";
    5- no evento "Ao abrir" do relatório, exclua, ou deixe como comentário, a linha abaixo:
    qdf.Parameters("[forms]![frmReports_producao]![Filtro]") _
        = frm!Filtro
    6- substitua a macro inserida no evento "Ao clicar" do botão no formulário, pelo código abaixo:

    Código:
    If Not IsNull(Me!Filtro) Then
        Dim db As Database, qdf As QueryDef
        Set db = CurrentDb

        Set qdf = db.QueryDefs("consColaboradores")
        qdf.SQL = "SELECT Codigo, Tradutor FROM Colaboradores WHERE (Codigo In (" & Me!Filtro & "))"
        DoCmd.OpenReport "ProdutividadeInternaanalitico", acViewPreview
    Else
        MsgBox "Selecione um ou mais colaboradores"
    End If

      Data/hora atual: Sex 22 Nov 2024, 7:09 pm