Bonjour,

Je cherche à attribuer dynamiquement une macro à un bouton, mais je veux passer un paramètre à cette macro:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
ActiveSheet.Shapes.AddShape(msoShapeStripedRightArrow, x, y, 50#, 15#).Select
   With Selection
   .Name = NomShape
   .ShapeRange.Fill.Solid
   .ShapeRange.Fill.ForeColor.SchemeColor = 57
   .ShapeRange.Line.ForeColor.SchemeColor = 64
   .OnAction = "OuvrirMRP(" & Trim(Str(Ligne)) & ")"
   End With
Mais voilà, j'ai une erreur

1004: Impossible de définir la propriété OnAction de la classe Rectangle"
Quelqu'un a une idée?
Merci!