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

    Não reconhece Field Control Source em relatório com consulta referência cruzada

    avatar
    JuliaS
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 4
    Registrado : 29/04/2022

    Não reconhece Field Control Source em relatório com consulta referência cruzada Empty Não reconhece Field Control Source em relatório com consulta referência cruzada

    Mensagem  JuliaS 21/9/2022, 18:44

    Oi, tenho uma consulta de referência cruzada, nas linhas retornam siglas, colunas são mês/ano (máximo 12) e valores é a soma da quantidade produzida. Obs.: uso alias (Linha, Data e Quantidade, respectivamente).

    https://i.servimg.com/u/f81/20/45/24/49/consul12.jpg

    Criei relatório com 13 labels (lbl0, lbl1, lbl2, ..., lbl12) e respectivas caixas de textos (txt0, txt1, txt2, ..., txt12).

    https://i.servimg.com/u/f81/20/45/24/49/relatz12.jpg

    Consigo definir o Caption, mas não mostra os resultados. Parece algum problema ao definir Control Source. Alguém sabe me dizer?

    https://i.servimg.com/u/f81/20/45/24/49/inspez10.jpg

    Código:
    Private Sub Report_Load()

        'Parâmetro
        Dim meses As Integer
        meses = 6
        
        'Declaração variáveis
        Dim dbs As DAO.Database
        Dim qdf As DAO.QueryDef
        Dim rst As DAO.Recordset
        Dim colunas As Integer
        Dim I As Integer
            
        Set dbs = CurrentDb
        
        'Produção mensal por linha dos últimos N meses
        Set qdf = dbs.QueryDefs("slcProducaoPorLinhaMensal")
        qdf.Parameters("meses").Value = meses
        Set rst = qdf.OpenRecordset(dbOpenDynaset)
        
        With rst
            For I = 0 To .Fields.Count - 1
                Me("txt" & I).ControlSource = .Fields(I).Name
                Me("txt" & I).Visible = True
                Me("lbl" & I).Caption = .Fields(I).Name
                Me("lbl" & I).Visible = True
            Next I
        End With
        
        rst.Close
        Set rst = Nothing
        
        qdf.Close
        Set qdf = Nothing
        
        Set dbs = Nothing
            
    End Sub
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Não reconhece Field Control Source em relatório com consulta referência cruzada Empty Re: Não reconhece Field Control Source em relatório com consulta referência cruzada

    Mensagem  Alexandre Fim 21/9/2022, 19:28

    Olá Júlia,

    Somente com imagens fica mais dificil de ajudar.
    Por gentileza, envie uma cópia do bd, somente objetos (tabelas/consultas/relatorios e etc.) envolvidos na questão, para análise e solução.

    Grato.

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Não reconhece Field Control Source em relatório com consulta referência cruzada Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    JuliaS
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 4
    Registrado : 29/04/2022

    Não reconhece Field Control Source em relatório com consulta referência cruzada Empty Re: Não reconhece Field Control Source em relatório com consulta referência cruzada

    Mensagem  JuliaS 21/9/2022, 20:59

    Segue anexo. Desde já agradeço!
    Anexos
    Não reconhece Field Control Source em relatório com consulta referência cruzada AttachmentAqui.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (241 Kb) Baixado 1 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Não reconhece Field Control Source em relatório com consulta referência cruzada Empty Re: Não reconhece Field Control Source em relatório com consulta referência cruzada

    Mensagem  Alexandre Fim 21/9/2022, 23:46

    Julia, boa noite

    Aproveitei os dados da consulta referencia cruzada para gravar os valores em uma tabela, e também gerar o relatório através dela.

    Ficou assim:
    Não reconhece Field Control Source em relatório com consulta referência cruzada Prod_m10

    Ao clicar no botão "Visualizar", o sistema abre o relatorio:
    Não reconhece Field Control Source em relatório com consulta referência cruzada Prod_m11


    Segue versão do sistema com os devidos ajustes.

    Espero ter ajudado.

    Att,

    Alexandre Fim
    Anexos
    Não reconhece Field Control Source em relatório com consulta referência cruzada AttachmentAqui_v2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (258 Kb) Baixado 1 vez(es)


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Não reconhece Field Control Source em relatório com consulta referência cruzada Setinf11
    Sistemas e Tecnologia Ltda

      Data/hora atual: 6/10/2022, 07:56