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]Mensagem de erro de tamanho de margem em relatório do word.

    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 15/8/2014, 14:58

    Bom dia Mestres.
    Tenho um botão que cria um relatório baseado em um doc do word e depois envia o mesmo para impressão.
    Pois bem, nessa hora, aparece aquela mensagem de "As margens estão fora da área de impressão...", mais ou menos isso.
    Tem como imprimir direto sem que abra essa mensagem?
    PS: o doc modelo não pode ter as margens alteradas, pois sairia em 2 páginas, o que não quero.

    Aguardo suas luzes...
    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 : 530
    Registrado : 20/01/2013

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  João Ricardo 15/8/2014, 15:16

    Olá Luiz,

    Vc já tentou usar desabilitar as mensagens padrão o Access, escrevendo esta função no botão que dá origem ao doc?

    Código:
    Response = acDataErrContinue 'inibe msg padrão do access.

    Tenta aí, se o problema for no Access será resolvido, mas se for no Word talvez tenha que estudar as propriedades do mesmo ou então da impressora.


    .................................................................................
     cheers Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  study   scratch 
    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 15/8/2014, 15:36

    Olá João, blz?
    A msg que aparece, na verdade, é a do word.
    Vou testar sua dica, mas acho que não vai resolver.
    Em que parte do código coloco essa variável do comando?

    Abrasss!!!
    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 : 530
    Registrado : 20/01/2013

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  João Ricardo 15/8/2014, 21:33

    Imediatamente antes da execução do mesmo, ou seja, será executado o comando e depois o restante do código.

    Até mais.


    .................................................................................
     cheers Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  study   scratch 
    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 19/8/2014, 12:40

    Mas esse Response é uma variável, correto?
    De qual tipo e o que fazer com ela?

    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 : 530
    Registrado : 20/01/2013

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  João Ricardo 19/8/2014, 13:56

    Fala Luiz
    Troque a informação anterior por esta

    DoCmd.SetWarnings False

    após executar o comando de envio da envio do relatório, repita o comando para habilitar novamente as mensagens, caso queira, mas substituindo False por True.


    .................................................................................
     cheers Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  study   scratch 
    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 20/8/2014, 12:08

    Não funcionou.
    Segue abaixo a linha de código que chama o doc para impressão. Me mostre em qual parte a insiro.
    Código:
    Private Sub cmdOkMemo_Click()

    Dim strArquivo As String
    Dim strLocal As String
    Dim imprime As Variant

    strArquivo = "Memo - " & Me.txtNumMemo.Value & "-" & Format(Now(), "yyyy") & " - " & Me.txtAssunto.Value & ".docx"
    strLocal = CurrentProject.Path & "\Relatórios\Memorandos Externos\" & strArquivo
                   
    Dim oApp As Object
                   
    If IsNull("strLocal") Then
        MsgBox ("Esse Memorando não existe!"), vbOKOnly + vbInformation
        Exit Sub
    Else
        imprime = MsgBox("Confirma a impressão do Memorando " & Me.txtNumMemo.Value & "?", vbQuestion + vbYesNo, "Imprimir")
                   
        Select Case imprime
            Case vbYes
                Set oApp = CreateObject("Word.Application")
                With oApp
                    .Documents.Open strLocal
                    .ActiveDocument.PrintOut Copies:=2
                    .ActiveDocument.SaveAs strLocal
                    .ActiveDocument.Close
                End With
                oApp.Quit
                Set oApp = Nothing
            Case vbNo
                DoCmd.CancelEvent
                MsgBox "Impressão Cancelada !", vbInformation, "Informando..."
        End Select
    End If

    End Sub

    Grato.

    Abrasss!!!
    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 : 530
    Registrado : 20/01/2013

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  João Ricardo 20/8/2014, 14:36

    Grande Luiz

    A mensagem, como vc havia citado, é específica do Word. Já me deparei com esse problema em documentos do próprio Word. Na ocasião foi resolvido mudando as configurações das margens. Eu não sei como fazer isso (configuração das margens) no VBA para enviar para o Word. Sempre trabalho com doc em PDF e esse problema não aparece.
    Se vc inseriu o comando e, mesmo assim, a msg continua aparecendo, tenho grande certeza de que é do próprio Word.

       Select Case imprime
           Case vbYes
               DoCmd.SetWarnings False
               Set oApp = CreateObject("Word.Application")
               With oApp
                   .Documents.Open strLocal
                   .ActiveDocument.PrintOut Copies:=2

    Testou dessa forma?

    Sucesso!!!!!!!


    .................................................................................
     cheers Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  study   scratch 
    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 20/8/2014, 15:03

    Sim, exatamente assim que havia testado e não funfou.
    Uso a maioria dos relatórios em PDF, mas alguns tem que ser no word, para edição depois, mas tem essa msg chata das margens. Atrasa um pouco a impressão.
    Algum outro método conhecido?

    Grato.
    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 : 530
    Registrado : 20/01/2013

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  João Ricardo 20/8/2014, 15:10

    Infelizmente não conheço.
    Deixe o tópico para ver ser outros colegas conseguem resolver pra ti.

    Já pesquisou em algum fórum do Word?


    .................................................................................
     cheers Busco aprendizado e gostaria de contato com pessoas de Campo Grande - MS  study   scratch 
    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 22/8/2014, 12:59

    Alguém pode dar uma luz, por favor?

    Grato!
    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 27/8/2014, 12:07

    Bom dia.
    Alguma dica hoje?
    Luiz Carlos Junior
    Luiz Carlos Junior
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 473
    Registrado : 21/08/2012

    [Resolvido]Mensagem de erro de tamanho de margem em relatório do word. Empty Re: [Resolvido]Mensagem de erro de tamanho de margem em relatório do word.

    Mensagem  Luiz Carlos Junior 27/8/2014, 19:38

    Boa tarde.
    Como não obtive resposta e o tempo está curto, decidi arrumar no próprio doc do word mesmo.
    Grato pela atenção de todos.

    Abrasss!!!

      Data/hora atual: 12/4/2021, 00:59