Discussion :

[ouioui_cmoi]

Bonjour
comment je peux faire poour assigner par VBA une macro à un mon bouton?
l enregistreur de macro me donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
 
    Application.CommandBars("Standard").Controls.Add Type:=msoControlButton, ID _
        :=2950, Before:=23

Mais il ne m'associe pas ma macro automatiquement à mon bouton...

(question accessoire : comment faire pour choisir de mettre sur mon bouton du texte plutot que le smiley?)

[Invité]

Bonjour

Un peu de lecture, cet article a été fait pour Access, mais les instructions sont les mêmes, car les applications partagent la même bibliothéque.

Starec

[ouioui_cmoi]

euh j'ai essayé....

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
'
    Application.CommandBars("standard").Controls.Add Type:=msoControlButton, ID _
        :=2950, Before:=23
 
Application.CommandBars("standard").Controls(1).OnAction = "vnqldknv"

mais, je ne sais pas pourquoi, ça ne me l'assigne toujours pas

[Invité]

Re

Bizarre

Voici comment il faut mieux procéder :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Public Sub barre()
    Dim btn As Office.CommandBarControl
    Set btn = Application.CommandBars(1).Controls.Add(msoControlButton)
    With btn
        .Caption = "toto"
        .Style = msoButtonCaption
        .OnAction = "test"
    End With
End Sub

et la routine test

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Public Sub test()
    MsgBox "CA MARCHE"
End Sub

Starec

[ouioui_cmoi]

j'ai mis exactement ce que tu as mis...mais ça ne me crée même plus le bouton
je dois avouer je ne comprend pas trop...parce que, à priori, on code me parait bon...

[Invité]

Re

j'ai mis exactement ce que tu as mis...mais ça ne me crée même plus le bouton
je dois avouer je ne comprend pas trop...parce que, à priori, on code me parait bon...

Il est bon, je viens de le faire à la volé sous Excel 2000.
Comment lances-tu ton code, où est-il placé ?
De plus as-tu bien mis un caption à ton bouton et le bon style ? C'est le seul moyen de le voir apparaitre.

Starec