Forum - Εμφάνιση ενός μόνο μηνύματος - Active X Controls Πρόβλημα σε εξαγωγή έκθεσης σε PDF "The OutputTo action was canceled"

nasos23 · #2 16-11-18, 07:15

Καλημέρα σε όλους.
Σάκη δοκίμασε αυτό και δες αν σου κάνει.

Κώδικας:

Private Sub PDFcat_Click()
On Error GoTo MyErrorHandler
DoCmd.SetWarnings False
If Me.CompoRACE <> "" And Me.CATEGORY <> "" Then
DoCmd.OpenReport "rptResults", acViewPreview, , "[ID_RACE]=" & Me.CompoRACE & "and " & "[CATEGORY]=" & Me.CATEGORY
DoCmd.OutputTo acOutputReport, "rptResults", _
acFormatPDF
DoCmd.Close acReport, "rptResults"
MyErrorHandler:
If Err.Number = 2501 Then
MsgBox "Ακύρωση αποθήκευσης"
Resume Next
Else
DoCmd.SetWarnings True
End If
End If
End Sub

Θέμα: Active X Controls Πρόβλημα σε εξαγωγή έκθεσης σε PDF "The OutputTo action was canceled"