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

    Resultado de Consulta em Caixa de Texto de relatório

    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 382
    Registrado : 28/10/2010

    Resultado de Consulta em Caixa de Texto de relatório Empty Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  zcarloslopes 9/5/2019, 09:32

    Bom dia,

    Peço a vossa ajuda para o seguinte:

    Necessito ter o resultado de uma consulta numa texbox de um Relatório.

    O resultado é uma String que pode vaiar entre 0 e 4 linhas.

    Uma forma de resolver é colocar uma ListBox (ListBoxA) Invisível com a Consulta na origem dos dados, para depois colocar os resultados na TextBox (txtBoxB) com o seguinte código:
    Código:
    Dim i As Integer, S As String
        
        With Me.ListBoxA
            For i = 0 To .ListCount - 1
                S = S & .ItemData(i) & "; "
            Next
        End With
              
        S = Left(S, Len(S) - 2)
        
        Me.txtBoxB = S

    Não haverá uma forma mais simples?

    Obrigado
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7283
    Registrado : 15/03/2013

    Resultado de Consulta em Caixa de Texto de relatório Empty Re: Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  ahteixeira 9/5/2019, 12:00

    Olá Carlos,

    Uma vez que é em relatório o simples será com um sub relatório, veja tópico abaixo:
    https://www.maximoaccess.com/t24449-resolvidorelatorio-com-detalhes-em-horizontal

    Nota o sub relatório, foi formatado com o assistente de etiquetas

    Abraço



    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 382
    Registrado : 28/10/2010

    Resultado de Consulta em Caixa de Texto de relatório Empty Re: Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  zcarloslopes 9/5/2019, 13:28

    Obrigado pelo retorno ahteixeira,

    O exemplo que refere não serve o meu propósito.

    Eu preciso separar cada linha (string) da consulta por ";" e apresentar os dados em linha e não em coluna como no exemplo.

    Neste caso em concreto refere-se a nomes, e como exemplo ficaria:

    Carlos Lopes; José Luís Ambrósio; Maria Ambrósia; etc.

    Obrigado
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7283
    Registrado : 15/03/2013

    Resultado de Consulta em Caixa de Texto de relatório Empty Re: Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  ahteixeira 9/5/2019, 14:50

    Olá Carlos,

    Pode montar um pequeno exemplo (e partilhar) de como está a fazer para se poder testar.

    Abraço
    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 382
    Registrado : 28/10/2010

    Resultado de Consulta em Caixa de Texto de relatório Empty Re: Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  zcarloslopes 9/5/2019, 15:38

    Obrigado pelo retorno.

    Anexo exemplo.

    Abraço
    Anexos
    Resultado de Consulta em Caixa de Texto de relatório AttachmentQuerytxtBox.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (106 Kb) Baixado 11 vez(es)
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7283
    Registrado : 15/03/2013

    Resultado de Consulta em Caixa de Texto de relatório Empty Re: Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  ahteixeira 9/5/2019, 16:20

    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 382
    Registrado : 28/10/2010

    Resultado de Consulta em Caixa de Texto de relatório Empty Re: Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  zcarloslopes 10/5/2019, 08:45

    Bom  dia ahteixeira,

    Obrigado pelo retorno.

    A sua última sugestão faz o que pretendo numa consulta, mas continua o problema de passar o resultado  da consulta para a txtBox.
    Teria que vincular o relatório ou usar um DLookup.

    Pelas possíveis sugestões que encontrei, aparece-me que a opção do meu exemplo, ainda assim, seja mais adequada.

    Fico a aguardar possíveis novas sugestões.

    Abraço
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7283
    Registrado : 15/03/2013

    Resultado de Consulta em Caixa de Texto de relatório Empty Re: Resultado de Consulta em Caixa de Texto de relatório

    Mensagem  ahteixeira 10/5/2019, 09:30

    Olá Carlos,

    Se é apenas para um registo, creio ser o mais adequado.
    Se for para uma listagem "corrida", Creio que a consulta é o mais adequado.

    Aguardamos se algum colega do fórum tem outra alternativa.

    Abraço

      Data/hora atual: 25/7/2021, 03:24