Help - Image TTbox / dynamique vba

[bloublou]

Bonjour à tous,

J'ai encore besoin de votre aide et de vos conseils.

Je voudrais que sur mon UF avec les 3 options buttons, un bloc de lignes apparaissent en partant des 3 colonnes qui sont dans la feuille excel.

J'ai essayé de chercher en prenant une photo des ces listes mais je n'arrive pas à les integrer avec vba, qu'importe le format sous textbox ou image ou frame...

J'ai fait des recherches sur les forums mais je n'y suis pas arrivé ou su adapter à mon cas 🙁 🙁

Merci de votre aide,

BlouBlou

 

[Modeste geedee]

Re : Help - Image TTbox / dynamique vba

Bonsour®

Bonjour à tous,
Je voudrais que sur mon UF avec les 3 options buttons, un bloc de lignes apparaissent en partant des 3 colonnes qui sont dans la feuille excel.

J'ai essayé de chercher en prenant une photo des ces listes mais je n'arrive pas à les integrer avec vba, qu'importe le format sous textbox ou image ou frame...

J'ai fait des recherches sur les forums mais je n'y suis pas arrivé ou su adapter à mon cas 🙁 🙁

il faut d'abord nommer ces listes (Definir un nom et utiliser la fonction DECALER)

puis ensuite à partir de l'evenements click de chaque Optionbouton
alimenter un objet dans le frame2

Private Sub OptionButton1_Click()
Frame2.Caption = "Legumes" '-------------------------------------------Nom de la liste
ComboBox1.RowSource = "ListLegumes"    ' --------------------remplissage liste déroulante
ComboBox1.ListIndex = -1    ' --------------------------------------------aucun item sélectionné

voir pièce jointe :

 

[kjin]

Re : Help - Image TTbox / dynamique vba

bonjour,
Je n'ai rien capté !
De quelles images s'agit-il !?
A+
kjin

 

[bloublou]

Re : Help - Image TTbox / dynamique vba

Bonjour Modeste Geedee et kjin,

Merci pour ta réponse Geedee mais c'est presque ca, sauf qu'à la place du combobox je veux juste un bloc de texte.
Si je clique sur Legumes, à droite se met la liste :
carrotte
navets
salade
poireau

J'avais pensé à une image parce qu'en prenant une photo des listes en colonne A B et C, si je clique sur options button, l'image de la 1ere liste apparait, l'image de la 2ieme liste apparait quand c'est les fruits, etc...

Est-ce que tu vois la petite astuce ?

J'espère avoir été plus clair
Cordialement

BlouBlou

 

[bloublou]

Re : Help - Image TTbox / dynamique vba

Bonjour Modeste Geedee et kjin,

Merci pour ta réponse Geedee mais c'est presque ca, sauf qu'à la place du combobox je veux juste un bloc de texte.
Si je clique sur Legumes, à droite se met la liste :
carrotte
navets
salade
poireau

J'avais pensé à une image parce qu'en prenant une photo des listes en colonne A B et C, si je clique sur options button, l'image de la 1ere liste apparait, l'image de la 2ieme liste apparait quand c'est les fruits, etc...

Est-ce que tu vois la petite astuce ?

J'espère avoir été plus clair
Cordialement

BlouBlou

Bonjour,

Est-ce que quelqu'un voit une solution à mon pb ?

Merci grandement

bloublou

 

[Modeste geedee]

Re : Help - Image TTbox / dynamique vba

Bonsour®

Bonjour,

Est-ce que quelqu'un voit une solution à mon pb ?

Merci grandement

bloublou

🙄 l'objet image issu d'une capture avec l'appareil photo n'est pas un objet OCX utilisable dans un userform
la liasion et Maj dynamique ne fonctionne pas...

soit tu utilises l'une ou l'autre des propositions faites précédement
soit tu utilises les images enregistrées de tes captures (pas de mise à jour dynamique)

voir fichier attaché :

 

[Si...]

Re : Help - Image TTbox / dynamique vba

salut

et Si... tu veux garder ton contrôle "Label", une autre proposition.
Dans le cas où ton nombre de boutons augmenterait il faudrait penser à un "Module de Classe".

 

[Modeste geedee]

Re : Help - Image TTbox / dynamique vba

Bonsour®

Bonjour,

c'est presque ca, sauf qu'à la place du combobox je veux juste un bloc de texte.

Est-ce que quelqu'un voit une solution à mon pb ?

Merci grandement

bloublou

autre solution
🙁 ce n'est ni un Label, ni une Image, ni un TextBox

avec
- noms definis dynamiques
- listbox statique i.e.non selectionnable(enabled=false)

Private Sub OptionButton1_Click()
ListBox1.RowSource = [Legumes].Address
End Sub

 

[bloublou]

Re : Help - Image TTbox / dynamique vba

Bonjour Geedee et Si...,

Effectivement, maintenant j'ai l'embarras du choix pour toutes ces solutions 🙂 🙂 🙂 Je ne sais plus laquelle choisir 😛

Merci beaucoup pour toute votre aide et votre expertise 😎

Bonne journée,

BlouBlou

 

[bloublou]

Re : Help - Image TTbox / dynamique vba

Rebonjour Modeste Geedee,

J'avais une question complémentaire sur ton explication sur options vers Label :

Si on copie le bouton rouge qui lance la macro, sur une autre feuille, les valeurs de la listbox ne suit pas...

Je ne comprends pas pourtant les noms font bien référence à la feuille Images, est-ce que tu as une solution ?

Merci de ton aide,

BlouBlou

 

[Modeste geedee]

Re : Help - Image TTbox / dynamique vba

Bonsour®

Rebonjour Modeste Geedee,

Si on copie le bouton rouge qui lance la macro, sur une autre feuille, les valeurs de la listbox ne suit pas...

Je ne comprends pas pourtant les noms font bien référence à la feuille Images

😕 😎 🙁 les subtilités de la fonction evaluation : [xxxxx]...

préferer cette écriture :

Private Sub OptionButton1_Click()
ListBox1.RowSource = ["legumes"]
End Sub
Private Sub OptionButton2_Click()
ListBox1.RowSource = ["Fruits"]
End Sub
Private Sub OptionButton3_Click()
ListBox1.RowSource = ["Fruits_secs"]
End Sub

 

[bloublou]

Re : Help - Image TTbox / dynamique vba

Bonjour Modeste Geedee,

Merci de ton aide, ça marche nickel 🙂

A bientôt

BlouBlou