XL 2013 Impression de plusieur page avec confirmation

[Matpo]

Bonjour a tous,

Voila j'ai fait un bouton pour imprimer plusieurs feuille en même temps

voici la macro

Sub Macro2()
Sheets(Array("017", "019", "036", "045", "046", "048")).PrintOut copies:=1
End Sub

je voudrais avoir une fenêtre qui s’ouvre quand je clic sur ce bouton pour demander une confirmation par oui ou non

d'avance merci pour votre aide.

 

[Staple1600]

Re

Tu as bien 3 MsgBox qui s'affichent, non ? (l'un après l'autre)

 

[Matpo]

non, rien ne ce passe,
pour ta tète c'est bon,je suis passer sur mon Mac et plus rien, une fenêtre normal

un grand merci pour tout

 

[Staple1600]

Re

Et là, toujours rien ???

Sub TeteAtete_II()
Dim WTF, i As Byte
WTF = Array(vbCritical, vbExclamation, vbQuestion)
With Application
For i = 0 To UBound(WTF)
MsgBox Choose(i + 1, .Version, .Caption, .UserName), WTF(i)
Next
End With
End Sub

 

[Staple1600]

Re


Depuis quand un Mac est un PC !!!!!!!
Je me doutais bien d'un truc du genre

Testes sur un vrai PC et tu verras des choses que tu ne verras pas sur un Mac
(enfin apparemment d'après ce que tu relates ici)

 

[Matpo]

la impossible d’exécuter le macro

 

[Staple1600]

Re

Relis le message#19
Testes sur un PC pas sur un Mac

 

[Matpo]

oui je sais mais bizarre quand même,

de voir une tète et de l'autre coté y a rien et j'ai aussi essayer sur un autre pc et j'ai rien
peut etre la version du pc

 

[Staple1600]

Re

Encore une fois, un Mac et un PC n'ont rien à voir
Sur un PC, c'est Windows qui tourne (en général) .
Sur un Mac, c'est l'OS d'Apple qui tourne.

 

[Staple1600]

Re

Pour info: Voila ce qui m'affiche sur mon PC