[VBA] code pour imprimé

Salut forum, je suis toujours intéréssé par le même problème de ptitnico, c-à-d
lorsque que je clique sur annuler l'impression se lance comme comme même dû a "printout" je sais pas si klk'un a une idée, et de même j'ai pas compris l'intervention de choubaka
Merci pour vos prochaines réponses

slt j'ai une imprimente model epson LX-300+ et j'ai perdu le cd-rom d'instalation.comment faire pour instaler l'imprimente dans l'ordinature ?

alors voila ma macro

Public Sub test()

On Error GoTo ErrorHandler

With ActiveDocument
.PrintSettings.Printer.showdialog

If vbNo = MsgBox("Imprimer ce document ?", vbYesNo) Then
GoTo ErrorHandler
Else
.PrintOut
End If

End With

ErrorHandler:

End Sub

est-ce qu'il est possible de creer une sorte de plugins qui créerait un icone dans un programm de type corel draw par example et qui exécuteré ma macro lorsque je cliquerais dessus .
merci

bon g quelques petites erreurs sur le programme précedant le code de base c sa:

Sub test()
With ActiveDocument
.PrintSettings.Print er.ShowDialog
.PrintOut
End With
End Sub

bon alors comment on fait pour trouver un entier correspondant au bouton utilisé lol

salut

normalement le showdialog te renvoie un entier correspondant au bouton utilisé ... Il te suffit de retrouver quel entier correspond à quel bouton ..

Bon g reussit en mettant se code:

Sub test()

With ActiveDocument
.PrintSettings.Printer.ShowDialog
.PrintOut
End If

Exit Sub
End Sub

Mais lorsque que je clique sur annuler l'impression se lance comme comme meme dû a "printout".
est ce que quelqu'un saurait comment ajouter une condition de sorte que lors que je fait annuler le programme s'arrete.
merci.

C'est pour Corel Draw 12

Avec Excel : Application.Dialogs(xlDialogPrint).Show
Avec Word : Application.Dialogs(wdDialogFilePrint).Show

Merci mais nan sa me sert pas a grand chose car mom imprimante est tres differantes elle a donc une boite de propriété tres particuliere il me faut juste un code qui aille directement à ces propriétés.

Bonjour,

Si ça peut te servir http://officesystem.access.free.fr/vba/imprimantes.htm

a+