[Resolvido]Erro: Ação OutputTo foi cancelada

Boa tarde,


No formulário "FrmGeral" tenho um botão que ao clicar me abre o relatório "RelGeral". No evento "ao clicar" deste botão tenho a seguinte linha de procedimento:

DoCmd.OutputTo acOutputReport, "RelGeral", acFormatPDF, strLocal

Esta linha de procedimento é responsável por me gerar o relatório no formado PDF.

Assim, ao clicar no botão me abre a caixa de opções do Windows onde posso selecionar a pasta e o local em que o arquivo será salvo.

Contudo, se eu decidir não salvar mais o documento e clicar em "cancelar", me aparece o seguinte erro:

Erro em tempo de execução '2501':
A ação OutputTo foi cancelada.


De igual forma, de acordo com a pesquisa o relatório não tiver nenhum dado a ser exibido, a mesma mensagem aparece.

Como resolver esse problema?

Boa tarde...

Poste o referido código envolvido para analisarmos o mesmo.

Grato.

Olá a todos,
Angelo Monteiro, já experimentou fazer o tratamento do erro.
Será algo assim que deve solucar na sua SUB:

Código:

Sub SeuReporte()
On Error GoTo ERR_Tratamento

    DoCmd.OutputTo acOutputReport, "RelGeral", acFormatPDF, strLocal

SAIR:
    Exit Sub
   
ERR_Tratamento:
    If Err.Number = 2501 Then
      MsgBox "A operação foi cancelada pelo utilizador.", vbInformation, ""
    Else
        MsgBox Err.Number & " - " & Err.Description, vbCritical, ""
    End If
    Resume SAIR
End Sub

Abraço

Amigo, não funcionou. Continua apresentando o mesmo erro.

Olá, será então melhor fazer como o colega Silvio sugeriu.
Poste uma base de dados com os objectos envolvidos para se testar.
Abraço

Não veria problemas em compartilhar, contudo é um banco de dados bem grande... devido ao tamanho não vou conseguir anexar.

Ola poste só com:
O formulário em questão o reporte e alguns dados de amostragem.
Se não conseguir.
Crie um exemplo novo a simular o que está a fazer e a dar o mesmo erro.
Abraço

Segue, anexo, exemplo do BD (adaptado).

Destacando que, ao clicar no botão correspondente para salvar em PDF, se clicar em CANCELAR apresenta o erro que foi especificado acima.

Aproveitando, estou com outra dificuldade. No relatório que é gerado, foi colocado um AGRUPAMENTO pelo nome da rua cadastrada, de modo, que ela seja relacionada uma única vez. Contudo, coloquei um campo QNTD com a seguinte fórmula "=Contar([Rua]) de modo que a quantidade de vezes em que a respectiva rua foi cadastrada aparecerá no campo QNTD.

Preciso que o relatório ordene em ordem decrescente pela quantidade de vezes, ou seja, pelo número que aparece no campo QNTD, tipo:

4 Rua do Marisco
2 Rua tal...
1 Rua tal...

Segue, banco de dados, anexo.

Olá Angelo Monteiro,
Não ficou muito diferente do código que postei na mensagem n.º 3, veja:

Código:

Private Sub Comando19_Click()
'ahteixeira (2017) para MaximoAccess
On Error GoTo ERR_Tratamento

    DoCmd.OutputTo acOutputReport, "01RelGeral", acFormatPDF, strLocal

SAIR:
    Exit Sub
    
ERR_Tratamento:
    If Err.Number = 2501 Then
       MsgBox "A operação foi cancelada pelo utilizador.", vbInformation, ""
    Else
        MsgBox Err.Number & " - " & Err.Description, vbCritical, ""
    End If
    Resume SAIR
End Sub

Relativamente à ordem de agrupamento, não devemos misturar temas, além disso  já tem um tópico aberto do mesmo assunto o qual não deu retorno:
https://www.maximoaccess.com/t30652-campo-contar-em-ordem-decrescente-no-relatorio
No entanto, verifique a consulta e o agrupamento do relatório.

Sugerio uma leitura das Regras do Fórum.

Espero que reveja a conduta que tem adotado e não abandone os tópicos sem dar o retorno de quem o ajuda.

Abraço e bons estudos com o MaximoAccess




Abraço

Obrigado pela ajuda e orientações.

Bom dia amigos,

só para complementar este tópico
sobre o erro:
Erro em tempo de execução '2501':
A ação OutputTo foi cancelada.

Algumas funções no vba/access, não funciona com quando colocamos caminhos de diretórios com nomes contendo espaços tipo: "pasta de arquivos"
como a função Shel, comigo já deu este erro

e tambem tem o fato de no Windows explorer nas nomeclaturas de pasta não pode ter certos caracteres como : /\*?"!<>
e se por acaso, no comando OutputTo no caminho da pasta estiver com estes caracteres vai dar este erro ai acima.

é bom observar isso,

Bom estudos a todos!

Olá Cleber Botelho,

Obrigado pela partilha da sua experiência com esta situação.

Abraço