Affecter Macro a un bouton par VBA

[Riddick]

Bonjour a tous

Voilà j'ai créé un bouton dans un barre de taches
je l'affiche et la 'désaffiche' avec la macro:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars('MaBarre').Visible = False
End Sub

Private Sub Workbook_Open()
Application.CommandBars('MaBarre').Visible = True
End Sub

je voudrais affecter au bouton une macro mais par le code pour ne pas qu'il demande a chaque fois que ce fichier sera utilisé d'un autre ordi du reseau.

Si quelqu'un a une idée....
J'ai pensé a

Application.CommandBars('Copie d'onglet').Controls('MonBouton').

Et il faudrait m'aider a finir
Merci d'avance...

 

[Luki]

Bonsoir Riddick,

Pour affecter une macro à un bouton de barre d'outils:
MonBouton.OnAction= ' le nom de la macro à éxécuter'

pour désactiver:
MonBouton.OnAction= ''

Pour trouver le bouton, soit :
set MonBouton=Application.CommandBars('MaBarre').controls(index)

soit si tu lui as donné un tag ( ce qui permet de ne pas avoir à se soucier de sa position dans la barre):
set MonBouton=Application.CommandBars('MaBarre').FindControl(Tag:='monboutontag')

Voili,voilou

A+

 

[Riddick]

Bonjour Luc

T'es au top exactement ce que je voulais
Il m'a fallu du temps pour comprendre qu'il fallait les guillemets autour du nom de la macro.....
Merci encore a plus tard