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]Relatorio nao abre

    tauron
    tauron
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1285
    Registrado : 07/12/2011

    [Resolvido]Relatorio nao abre Empty [Resolvido]Relatorio nao abre

    Mensagem  tauron 18/8/2016, 00:45

    Galera minha questao eh que ao chamar o relatorio "relmed" atraves do formulario, ou ele nao abre ou pede depuracao de um codigo mas, se chamar diretamente e informar os dados necessarios abre normalmente.

    https://www.dropbox.com/s/j7ou2lsmvyth8kn/Relatorio.mdb?dl=0
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3913
    Registrado : 14/08/2013

    [Resolvido]Relatorio nao abre Empty Re: [Resolvido]Relatorio nao abre

    Mensagem  FabioPaes 18/8/2016, 01:19

    Qual valor devo inserir executando o relatorio direto?
    0012016 e em seguida MATERIAL DE EXPEDIENTE



    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3913
    Registrado : 14/08/2013

    [Resolvido]Relatorio nao abre Empty Re: [Resolvido]Relatorio nao abre

    Mensagem  FabioPaes 18/8/2016, 01:28

    A principio o problema que encontrei e referente a condição que filtra pelo Numero do Documento... Pois esta pegando o valor da CxListagem errada...


    Esta assim:
    Private Sub Comando4_Click()
    Dim sel As Variant
    Dim strwhere As String

    strwhere = "nrDocumento in ("
    For Each sel In Me.ListaGrupo.ItemsSelected
    strwhere = strwhere & "'" & Me.ListaGrupo.ItemData(sel) & "',"
    Next
    strwhere = strwhere & ")"

    DoCmd.OpenReport "RelMed", acViewPreview, , strwhere

    End Sub


    -------------------------------------------------------------------------------------------


    Mude para:
    Private Sub Comando4_Click()
    Dim sel As Variant
    Dim strwhere As String

    strwhere = "nrDocumento in ("
    For Each sel In Me.ListaPedido.ItemsSelected
    strwhere = strwhere & "'" & Me.ListaPedido.ItemData(sel) & "',"
    Next
    strwhere = strwhere & ")"

    DoCmd.OpenReport "RelMed", acViewPreview, , strwhere

    End Sub


    Veja se seria isso amigo.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    tauron
    tauron
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1285
    Registrado : 07/12/2011

    [Resolvido]Relatorio nao abre Empty Re: [Resolvido]Relatorio nao abre

    Mensagem  tauron 18/8/2016, 11:37

    Muito obrigado fabio, penso que teria mesmo que abrir este post pois eu já havia testado as alteracoes sugeridas sem exito. E o mais estranho eh que o meu codigo que postei eu o utilizo em outros aplicativos sem problemas.

    Valeu mesmo.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3913
    Registrado : 14/08/2013

    [Resolvido]Relatorio nao abre Empty Re: [Resolvido]Relatorio nao abre

    Mensagem  FabioPaes 18/8/2016, 12:26

    Estranho mesmo.... pois da forma como estava comparava o numero do documento com a descricao material... mas importante e que deu certo... ate a proxima.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

      Data/hora atual: 13/4/2021, 13:41