A voir également:
- [VBA] code pour imprimé
- Code ascii - Guide
- Code puk bloqué - Guide
- Code activation windows 10 - Guide
- Comment déverrouiller un téléphone quand on a oublié le code - Guide
- Code blocks - Télécharger - Langages
10 réponses
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
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
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.
Avec Excel : Application.Dialogs(xlDialogPrint).Show
Avec Word : Application.Dialogs(wdDialogFilePrint).Show
Avec Word : Application.Dialogs(wdDialogFilePrint).Show
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
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.
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.
salut
normalement le showdialog te renvoie un entier correspondant au bouton utilisé ... Il te suffit de retrouver quel entier correspond à quel bouton ..
normalement le showdialog te renvoie un entier correspondant au bouton utilisé ... Il te suffit de retrouver quel entier correspond à quel bouton ..
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
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
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 ?
Bonjour,
Euhh ... c'est pas le bon endroit pour ce genre de demande (A moins que tu veuilles que l'on programme un driver pour ton imprimante ;p). Pour toi c'est ici ...
Euhh ... c'est pas le bon endroit pour ce genre de demande (A moins que tu veuilles que l'on programme un driver pour ton imprimante ;p). Pour toi c'est ici ...