Imprimer 2 feuilles à partir d'un boite de dialogue

[JOjo]

Bonjour,

J'utilisais la macro suivante à pârtir d'un feuille de donnée.
J'ai voulu l'associer à un bouton dans une boite de dialogue et ça ne marche pas à la seconde ligne :

"La méthode PrintOut de l'objet Sheets a échoué."

Merci de votre aide


Sub ImprimS1()
Sheets(Array("Feuil1", "Feuil2")).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, Preview:=True
Sheets("MenuS").Select
End Sub

 

[Evelynetfrancois]

bonjour

jE VIENS DE FAIRE UN ESSAIS
aucun prob
(XP)
E et F

 

[JOjo]

Je suis en excel 97 et je confirme le problème !
Merci.
JOso

 

[michel]

bonsoir Jojo , bosoir E&F

je viens de faire un essai ( excel 97 )
je n'ai pas eu de message d'erreur lors de l'impression

bonne soirée
michel

 

[JOjo]

Merci de votre persévérence.

Je suis en effet arrivé à imprimé via un userform
Mais le même code sur un DIALOGue ne s'imprime pas.. et je ne sais pas pourquoi.

Je peux cependant continuer avec le userform qui j'espère, est ok avec Excel 97.

j'avais tendance à gérer des dialogue en lieu des useform.
je vais essayer de comprendre les difféernces enter ces deux objets.