bouton capricieux...

[Moi]

Dans une feuille de calcul, g mis un bouton.
La macro bonjour() associée se trouve dans un Xla complémentaire.
Mon xls est référencé a ce fichier "bizoo.xla" dans le module VBA.
Nom du projet: Vbaproject(gentifichier.xls)

mon code reste pourtant foireux:

' assigne bonjour au bouton1 "Poli" // " " texte sur mon bouton
Sheets("feuille1").Shapes("Button 1").Select
Selection.OnAction = "bonjour"

// Comment spécifier le chemin d'acces a cette instruction???

 

[STéphane]

bonjour

si tu as dessiné ton bouton avec la barre de formulaires, ton code marche.
vérifie bien les noms de tes objets
Sub demo()
Sheets("feuil1").Shapes("Button 1").Select
Selection.OnAction = "bonjour"
End Sub

Sub bonjour()
MsgBox "bonjour"
End Sub

A noter qu'un bouton peut être appelé par son nom en français ou en anglais !!

si ton bouton est dessiné à l'aide d'une autre barre, c'est autre chose et j'ai pas ça sous la main


bye
stephane