paolonam1958
XLDnaute Nouveau
Bonjour à tous
j'ai une question simple pour laquelle j'ai parcouru des centaines de discussions sans parvenir à trouver ce que je cherche:
je suis dans un classeur composé de 2 feuilles ("économat" + "tab")
je suis dans la feuille xl appelée "économat"
j'ai dessiné un petit rond bleu en lui affectant une macro qui recopie certaines de mes cellules sur l'autre feuille appelée "tab"
question:
à la fin de cette copie, j'aimerais voir apparaitre une msgbox vbyesno
qui pose cette question :
"voulez-vous imprimer cette feuille ?" yes ou no
si no, il ne fait plus rien d'autre
si yes, il doit ouvrir la fenêtre de dialogue d'impression
(pour que je puisse choisir l'imprimante, le nb de copie etc)
j'ai écrit ceçi mais si la msgbox est correcte, il n'affiche pas ma
fenetre de dialogue d'impression tant attendue ...!
à vous lire depuis des jours, je suis sur que ce problème est pour vous un jeu
d'enfant mais pour le débutant que je suis.....
un tout grand merçi d'avance pour votre aide
Paul
MsgBox "Voulez-vous imprimer ce formulaire ?", vbYesNo + vbExclamation, "Avertissement"
If vbYesNo = Yes Then
Application.Dialogs(xlDialogPrint).Show
Else
End If
j'ai une question simple pour laquelle j'ai parcouru des centaines de discussions sans parvenir à trouver ce que je cherche:
je suis dans un classeur composé de 2 feuilles ("économat" + "tab")
je suis dans la feuille xl appelée "économat"
j'ai dessiné un petit rond bleu en lui affectant une macro qui recopie certaines de mes cellules sur l'autre feuille appelée "tab"
question:
à la fin de cette copie, j'aimerais voir apparaitre une msgbox vbyesno
qui pose cette question :
"voulez-vous imprimer cette feuille ?" yes ou no
si no, il ne fait plus rien d'autre
si yes, il doit ouvrir la fenêtre de dialogue d'impression
(pour que je puisse choisir l'imprimante, le nb de copie etc)
j'ai écrit ceçi mais si la msgbox est correcte, il n'affiche pas ma
fenetre de dialogue d'impression tant attendue ...!
à vous lire depuis des jours, je suis sur que ce problème est pour vous un jeu
d'enfant mais pour le débutant que je suis.....
un tout grand merçi d'avance pour votre aide
Paul
MsgBox "Voulez-vous imprimer ce formulaire ?", vbYesNo + vbExclamation, "Avertissement"
If vbYesNo = Yes Then
Application.Dialogs(xlDialogPrint).Show
Else
End If