bouton sur barre d'outils

S

Simon

Guest
Bonjour a tous

J'ai rattacher une barre d'outils a un fichier Excel, et uniquement a celui ci, grace a une macro trouvée sur le site.

Mais je n'arrive pas a inserer plus de 5 boutons

Comment faire

Merci

Je joins la commande permettant de rattacher la barre a 1 seul et unique classeur [file name=barre_outils_v02.zip size=25268]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/barre_outils_v02.zip[/file]
 

Pièces jointes

  • barre_outils_v02.zip
    24.7 KB · Affichages: 19
  • barre_outils_v02.zip
    24.7 KB · Affichages: 25
  • barre_outils_v02.zip
    24.7 KB · Affichages: 18

Staple1600

XLDnaute Barbatruc
Bonjour

Il suffit de copier cette partie du code autant de fois qu'il y a de bouton et de changer la ligne
.OnAction=ProcX
avec le nom de la macro que doit lancer le bouton

Set LBouton = .Controls.Add(Type:=msoControlButton)
With LBouton
.Caption = Caption1
.Style = StyleBouton
.OnAction = Proc1
End With



(code présent dans le classeur Copie de Demo Barreperso.xls contenu dans ton fichier joint)

Egalement adapter .Caption = Caption1
en remplaçant Caption1 par le nom adéquat

Message édité par: staple1600, à: 09/09/2005 14:48
 

Statistiques des forums

Discussions
312 972
Messages
2 094 055
Membres
105 930
dernier inscrit
Manoa