Bonjour,
J'ai une erreur pour un code VBA.
Je crée des boutons de maniére dynamique.
Pas de probléme pour la création pour X feuille mais j'ai une feuille "Effectifs". Qui me renvoi une "Erreur d'execution'1004' Impossible de lire la propriété de la classe Buttons.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Public Sub CreerBouton(NomFeuille As String, x As Double, Y As Double) Dim Bouton As Button Sheets(NomFeuille).Select Set Bouton = Sheets(NomFeuille).Buttons.Add(x, Y, 118.5, 20) With Bouton .OnAction = "RetourneMenu" .Caption = "Retourner au Menu" End With End Sub
Je ne comprend pas d'oû peut venir l'erreur car j'appel la fonction de la même maniére pour chaque feuille.
Cordialement.
Partager