Discussion :

[Newworld92]

Bonjour,

Dans ma feuille Excel, j'ai inséré un contrôle ActiveX => Autres contrôles => Microsoft Forms 2.0 Frame.

Dans cette Frame, j'ai inséré 4 cases d'options.
Je voudrais coder des instructions VB sur ces cases d'options.

Je bascule dans la fenêtre VB directement sur la fonction

Code :

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

Private Sub NomDeMaFrame_Click()

.

Est-ce bien dans cette fonction (relative à la Frame) que je code ce qui concerne les cases d'options ?

Est-il recommandé de renseigner l'attribut de propriété GroupName avec le nom de ma Frame pour ensuite manipuler les objets en écrivant par exemple :

Code :

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

NomDuGroupName.NomDeMaCaseDOption.Value = False

?

Sinon, quelle est la syntaxe adéquate ?

Merci d'avance pour votre aide.

Cdt.

[ZX12R]

Bonjour,

Peux tu préciser le contexte d'utilisation de la fenêtre ? En a tu besoin en permanence sur ta feuille ou bien juste en fonction d'une action précise ?

Personnellement (mais tout dépend du contexte), je m'orienterai plutôt vers l'utilisation d'un userform VBA que j'afficherais par un bouton sur la feuille ou dans une barre d'outils ou encore un événement spécifique.

l'UF étant à priori plus directement et facilement programmable au niveau des cases d'options.

Cordialement.

Bruno

[Newworld92]

Merci pour ta réponse.

Oui l'idée est d'avoir la frame en permanence dans la feuille pour permettre à l'utilisateur de jongler entre les cases d'option et avoir un affichage différent en fonction de la case choisie.

Du coup, j'aimerais avoir comment coder en VB pour ces cases sachant qu'elles font partie de la Frame.

Merci d'avance.

[jerome.vaussenat]

Salut,

Pour info, je ne suis pas super au point sur les frame dans une feuille de calcul.
Je te fait part du fruit de ma recherche pour faire avancer le schmilblick. (

)

Passe en mode edition du frame.
Cliques sur tes options, fait afficher les propriétés pour définir le NOM de l'option.

Par contre là où je pèche c'est le déclencheur. Ce que j'ai trouvé c'est la perte de focus. Ce qui suppose qu'après avoir choisi l'option, il faut sortir du frame ... (en espérant qu'on te propose mieux)

Code :

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

1
2
3
4
Private Sub Frame1_LostFocus()
        MsgBox Frame1.ActiveControl.Name
 
End Sub

Tu fais un test (if ou select case) sur le .ActiveControl.Name

[Newworld92]

Merci Jérôme.

Pourquoi ne pas utiliser GotFocus au lieu de LostFocus ?

[jerome.vaussenat]

salut,

Le get focus va s'executer avant que tu n'ai modifié tes options.

Je pense que c'est mieux. Je change les options et après j'exécute le code.