|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Jul 2007
Messaggi: 1092
|
[vba access] evitare msgbox su annullamento stampa
Ciao a tutti.
Tramite il seguente comando DoCmd.RunCommand acCmdPrint che segue il codice relativo all'apertura di un report di access, mi viene visualizzata la schermata relativa alla stampa. Tuttavia se decido di annullare la stessa mi viene mostrato un msgbox con la dicitura "L'azione runcommand è stata annullata". E' possibile evitare la comparsa di tale messaggio? Grazie in anticipo. |
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Jul 2007
Messaggi: 1092
|
Ho parzialmente risolto in questo modo intercettando l'evento 2501 dopo una ricerca su google più approfondita.
Codice:
Private Sub Comando10_Click()
On Error GoTo Err_Comando10_Click
Dim stDocName As String
stDocName = "Report1"
DoCmd.OpenReport stDocName, acPreview, , "id=" & Me.id
DoCmd.RunCommand acCmdZoom100
DoCmd.RunCommand acCmdPrint
Exit_Comando10_Click:
Exit Sub
Err_Comando10_Click:
If Err.Number <> 2501 Then
MsgBox Err.Description
Resume Exit_Comando10_Click
End If
End Sub
|
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 13:32.



















