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

    [Resolvido]Após filtro não funciona botão impressão

    João Ricardo
    João Ricardo
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 534
    Registrado : 20/01/2013

    [Resolvido]Após filtro não funciona botão impressão Empty [Resolvido]Após filtro não funciona botão impressão

    Mensagem  João Ricardo 16/2/2014, 03:13

    Amigos, bom dia!

    Estou com um problema no formulário de impressão de relatórios
    Adaptei este recurso a partir do Maestro - aplicativo disponibilizado pelo grande mestre Avelino.
    Acontece que qdo a lista com os relatórios é carregada na inicialização do formulário o btnImprimir funciona, mas qdo eu uso a caixa de texto para filtrar e encontra o relatório que desejo, o referido botão não funciona.

    Segue abaixo uma parte do bd para observações.

     bounce Baixe o anexo aqui bounce 
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Após filtro não funciona botão impressão Empty Re: [Resolvido]Após filtro não funciona botão impressão

    Mensagem  Avelino Sampaio 18/2/2014, 09:49

    Olá!

    Acrecente o campo nomeRelatorios na consulta:

       Dim strsql As String
       strsql = "SELECT idRelatorio, Descricao, nomerelatorio "
       strsql = strsql & "FROM tblListaRelatorios "
       strsql = strsql & "WHERE Descricao like ""*" & filtro & "*"" "
       strsql = strsql & "ORDER BY Descricao;"
       Me!ListaRelatorio.RowSource = strsql

    Na proprieade da listbox altere para 3 colunas
    tamanho de cada coluna: 1cm;10cm;0cm

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    João Ricardo
    João Ricardo
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 534
    Registrado : 20/01/2013

    [Resolvido]Após filtro não funciona botão impressão Empty Re: [Resolvido]Após filtro não funciona botão impressão

    Mensagem  João Ricardo 18/2/2014, 12:43

    Grande Avelino. Muito obrigado.

    Funcionou 100%  cheers 
    João Ricardo
    João Ricardo
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 534
    Registrado : 20/01/2013

    [Resolvido]Após filtro não funciona botão impressão Empty Re: [Resolvido]Após filtro não funciona botão impressão

    Mensagem  João Ricardo 18/2/2014, 21:38

    Avelino parabéns pelo número de mensagens no fórum.
    Qdo vc respondeu ao post, com a solução para o problema, sua contagem estava exatamente em 2000 mensagens no fórum.

    Um dia chego lá e, com certeza, ajudando mais aos colegas do que perguntado dúvidas.

    Grande abraço.

    Conteúdo patrocinado


    [Resolvido]Após filtro não funciona botão impressão Empty Re: [Resolvido]Após filtro não funciona botão impressão

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 02:57