syntaxe avec un commandbutton et une variable

[natorp]

Bjr à tous et toutes

je suis dans un userform où cette ligne fonctionne correctement :
ActiveSheet.CommandButton2.BackColor = &HFF

j'aimerais remplacer le chiffre par une variable j correctement définie auparavant, je ne trouve pas la bonne syntaxe :
ActiveSheet.CommandButton " & j & ".BackColor = &HFF

il en est de même pour une macro
Ok2 fonctionne

quelle est la syntaxe pour y inclure la variable j
Ok & j ??

merci de votre aide, cordialement
Gérard

 

[Cousinhub]

Re : syntaxe avec un commandbutton et une variable

Bonjour,

tu commences par :

je suis dans un userform

puis :

ActiveSheet.CommandButton2

Euh, les boutons se situent sur l'onglet, ou dans un userform?

 

[Gorfael]

Re : syntaxe avec un commandbutton et une variable

Salut natorp et le forum
Si ton bouton est issu de la "boîte à outils contrôle

ActiveSheet.controls("CommandButton" & j).BackColor = &HFF

A+

 

[natorp]

Re : syntaxe avec un commandbutton et une variable

Merci bhbh et Gorfael

les boutons sont bien sur l'onglet et issus de la boîte à outils contrôle et quand je mets la syntaxe de Gorfael j'ai la réponse suivante :
"Propriété ou Méthode non gérée par cet objet"

Merci de votre aide, cordialement
Gérard

 

[Robert]

Re : syntaxe avec un commandbutton et une variable

Bonjour le fil, bonjour le forum,

J'ai testé ton code Gorfael, car je pensais aussi que ça fonctionnerait, mais ça plante...

Je propose :

ActiveSheet.Shapes("CommandButton" & j).Select
Selection.Object.BackColor = &HFF

Pour la seconde question je n'ai pas la réponse...

 

[natorp]

Re : syntaxe avec un commandbutton et une variable

Merci Robert
ça fonctionne avec un léger détail, une fois que je sors du userform le bouton en question a 8 peitis ronds autour de lui comme si on avait cliqué sur lui en mode création de la boite à outils contrôle
Que veut dire shapes ?

merci... Gérard

 

[Robert]

Re : syntaxe avec un commandbutton et une variable

Bonjour le fil, bonjour le forum,

rajoute cette ligne :

Activecell.Select

qui selectionnera la cellule active (et donc désélectionnera le bouton)...
La collection Shapes comprend tous ce que tu incorpores sur un onglet que ce soit avec la barre d'outils Dessins ou autres comme des images, boutons, etc...

 

[natorp]

Re : syntaxe avec un commandbutton et une variable

Merci à vous, ça marche nickel...

Au plaisir
Gérard