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


4 participantes

    [Resolvido]Minimizar form ao abrir relatorio

    avatar
    Convidado
    Convidado


    [Resolvido]Minimizar form ao abrir relatorio Empty Minimizar form ao abrir relatorio

    Mensagem  Convidado 20/5/2011, 21:37

    Meus amigos apesar do meu ja razoavel conhecimento, estou tendo um problema com essa questao..

    Tenho um botao no form que abre um relatorio filtrado, mas nao posso fecha-lo na hora de abrir o relatorio, pois o mesmo usa os dados do form ativo...

    isso nao seria problema se o relatorio fosse PopUp, mas não é
    eu abro ele para que eu possa usar a faixa de impressão nativa do access...

    e assim o relatorio fica por tras do form..

    então preciso que ao abrir do relatorio, minimize o form
    e ao fechar, o restaura..

    Se puderem me ajudar
    Fico grato
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  criquio 20/5/2011, 21:45

    E se ocultar o form no mesmo botão que abre o relatório?

    Me.Visible = False

    E ao fechar o relatório:

    Forms!NomeDoform.Visible = True


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  vieirasoft 20/5/2011, 21:52

    E porque não fechar o form, abrir o relatório e ao fechar o relatório abrir o form de novo. Não acham mais profissional?

    DoCmd.Close acForm, "nomedoform"

    E no Relatório

    DoCmd.OpenForm "nomedoform"

    Sds
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  criquio 20/5/2011, 22:03

    Bem, a questão é que em alguns momentos, o relatório pode necessitar ainda dos dados do formulário para alguma atualização ou algo assim, porque nesse caso específico, o formulário é que alimenta o relatório. Aí, caso ele esteja fechado, vai gerar erro. Mas se o relatório não precisar do formulário em momento nenhum a não ser na abertura, fica a critério do colega Very Happy


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  vieirasoft 20/5/2011, 22:08

    O erro trata-se no abrir do form, que achas? é simples.
    Dim strMsg As String, strTitle As String
    Dim intStyle As Integer

    strMsg = "Não existem dados a Visualizar!!! "
    intStyle = vbOKOnly
    strTitle = "Sem dados no sistema"

    MsgBox strMsg, intStyle, strTitle
    Cancel = True
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  criquio 20/5/2011, 22:10

    Mas a questão que estou a falar é se o relatório ainda precisar dos dados vindos do formulário em momentos de alguma atualização ou algo assim, entendes?


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  JPaulo 20/5/2011, 22:20

    Sou da mesma opinião do Criquio e é o simples;


    No form:

    Private Sub SeuBotão_Click()
    Me.Visible = False
    DoCmd.OpenReport "SeuRelatório", acPreview
    End Sub


    No relatório:

    Private Sub Report_Close()
    Forms!SeuFormulario.Visible = True
    End Sub





    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Minimizar form ao abrir relatorio Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Minimizar form ao abrir relatorio Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Minimizar form ao abrir relatorio Folder_announce_new Instruções SQL como utilizar...

    GILSON EDILENO gosta desta mensagem

    avatar
    Convidado
    Convidado


    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  Convidado 20/5/2011, 23:15

    O relatorio depende do form aberto, caso esteja fechado o relatorio nao abre com os dados que preciso.
    Creio que a solucao do criquio va servir..
    vou testa-la amanha e dou retorno
    Grato
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  criquio 20/5/2011, 23:26

    Falou. Aguardaremos.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  vieirasoft 20/5/2011, 23:28

    Então está certo, se é assim, já cá não está quem falou. Pepanp! rsrsrs
    avatar
    Convidado
    Convidado


    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  Convidado 24/5/2011, 14:58

    Ops Resolvido


    Grsato a todos!
    avatar
    Convidado
    Convidado


    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  Convidado 24/5/2011, 14:59

    ok
    avatar
    bacano
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 136
    Registrado : 08/12/2010

    [Resolvido]Minimizar form ao abrir relatorio Empty Minimizar form ao abrir relatorio

    Mensagem  bacano 12/6/2015, 19:30

    Tenho um formulário Pop-up, Contratos
    Ao abrir fica normal no meio da tela

    Ao mandar visualizar um relatório e após o fecho do mesmo, o dito formulário Contratos, fica em tela cheia em vez de Pop-up.

    O que estarei a fazer de mal ???


    junto envio código do formulário:

    Private Sub ImprimirContrato_Click()
    On Error GoTo Err_ImprimirContrato_Click
    DoCmd.OpenReport "ContratosAluguer", acViewPreview, , "[IDDocumento]=" & Me![IDDocumento]
    Me.Visible = False
    Exit_ImprimirContrato_Click:
    Exit Sub

    Err_ImprimirContrato_Click:
    MsgBox Err.Description
    Resume Exit_ImprimirContrato_Click

    End Sub


    junto envio código do Relatorio:

    Private Sub Report_Close()
    If IsOpen("Contratos") Then
    Forms![Contratos].Visible = True
    End If
    If IsOpen("ContratosVisualizar") Then
    Forms![ContratosVisualizar].Visible = True
    End If
    End Sub

    Conteúdo patrocinado


    [Resolvido]Minimizar form ao abrir relatorio Empty Re: [Resolvido]Minimizar form ao abrir relatorio

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 15:30