creer un bouton de commande

[marie]

Bonsoir a tous,

Je souhaiterai créer un bouton de commande (imprimer) à l'aide d'une macro.

Dans cette macro, je crée un nouveau classeur et de nouvelles feuilles. Je souhaite insérer un bouton de commande pour lancer l'impression de la feuille activée.
Comment puis je faire? merci de vos reponses.
En cherchant j'ai trouve ca :
Set NouveauBouton = ActiveSheet.OLEObjects.Add _
('Imprimer')

Mais ca bloque...
A bientot
marie

 

[Bricofire]

Bonsoir Marie,

Voici un lien donné par Michel xld récemment que j'ai trouvé en faisant... recherche sur le forum

Il comporte d'autres lien tu devrais y trouver ton bonheur, notemment au niveau des détails à respecter...

Lien supprimé

Bonne nuit,

Edition : mais, ce que tu veux, ce n'est pas ce que fait le bouton imprimer d'excel directement déjà ?

Brico

Message édité par: Bricofire, à: 14/05/2006 01:09

 

[Marc_du_78]

Bonjour Marie,

Essaie ceci pour la création d'un bouton (formulaire) :

Sub Macro1()
Application.CommandBars('Forms').Visible = True
ActiveSheet.Buttons.Add(139.5, 54.75, 114, 21).Select
End Sub

 

[Marc_du_78]

Bonjour Bricofire,
Je ne t'avais pas vu arriver.
Toujours pas sommeil ?
Bon dimanche