Boucle et caption

Bonjour cher tous,
Merci d'avance de bien vouloir vous pencher sur mon problème.

Ce que je veux faire c'est :
- lister 5 fichiers présents dans un répertoire donné,
- récupérer les noms de fichiers (nom1, nom2, nom3, nom4, nom5) pour qu'ils deviennent "légende" de 5 OptionButtons nommées respectivement :
optB1,
optB2,
optB3,
optB4,
optB5

voici mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Private sub importDoc   Application.ScreenUpdating = False Dim numero As String numero = 0   Dim myPath As String, myFile As String myPath = ActiveDocument.Path & Application.PathSeparator & "mondossier" myFile = Dir(myPath & "\*.doc*")   Do While myFile <> "" numero = numero + 1 MsgBox = "optB" & numero & ".Caption" ' ---> ça fonctionne! 5 msgbox se succèdent et indiquent "optB1.caption", "optB2.caption", "optB3.caption" jusque 5.   ???? = myFile myFile = Dir() Loop End Sub

---

???? je ne trouve pas par quel moyen je peux exploiter "optB" & numero & ".Caption" = myFile
pour que obtenir optB1 = "nom1",
optB2 = "nom2",
...

D'avance merci pour votre aide

Citation:

---

Envoyé par chrgillet

B
Ce que je veux faire c'est :
- lister 5 fichiers présents dans un répertoire donné,
- récupérer les noms de fichiers (nom1, nom2, nom3, nom4, nom5) pour qu'ils deviennent "légende" de 5 OptionButtons

---

Il y aura toujours 5 fichiers pour 5 boutons ou c'est juste un exemple?

Pour ton cas il faudra boucler sur tous les éléments de ton formulaire dont le type est OptionButtons et leur affecter à tour de rôle le nom du fichier associé.

Citation:

---

Envoyé par ZenZiTone

Il y aura toujours 5 fichiers pour 5 boutons ou c'est juste un exemple?

---

Pas nécessairement. En fait, je veux balayer un dossier contenant un certains nombre de fichiers et je veux les importer dans mon formulaire pour les rendre "cliquables".
A mon niveau, je me suis dit qu'il serait plus facile de me limiter à 5 fichiers, les plus récents... Cela serait déjà très bien.

Comment puis-je boucler sur tous les éléments de mon formulaire dont le type est OptionButtons et leur affecter à tour de rôle le nom du fichier associé?

Citation:

---

Envoyé par chrgillet

Comment puis-je boucler sur tous les éléments de mon formulaire dont le type est OptionButtons et leur affecter à tour de rôle le nom du fichier associé?

---

Dans ton formulaire tu as quelque chose comme

Code:

---

1 2	Form.Controls

---

C'est une liste d'objets recensant tous les contrôles de ton formulaire, dont les fameux OptionButton. Tu devras donc, pour chaque contrôle de ton formulaire faire le test suivant : "est-ce que mon contrôle est de type OptionButton". Si oui, tu affectes la propriété Caption (celle qui affiche le texte) avec le nom d'un fichier.

Petite question : pourquoi l'utilisation des OptionButton qui est, me semble-t-il, un contrôle du VB6?

Si tu n'as pas un nombre définit de fichier je ne te conseille pas d'utiliser les boutons. Ne pas connaitre le nombre de boutons à afficher inclus qu'il faut gérer leurs affichage en fonction du nombre et de la place qu'ils prennent : c'est pas évident et il est difficile d'arriver à un résultat "joli" et ergonomique.

Tu peux essayer d'utiliser les treeview qui me semble plus correspondre à ton besoin.

Merci pour cette nouvelle réponse fort intéressante!

Je découvre "les treeview" c'est effectivement bien de çà dont il s'agit. Va falloir plonger dedans et je vais m'y atteler dès que possible :D

Citation:

---

Envoyé par ZenZiTone

Tu devras donc, pour chaque contrôle de ton formulaire faire le test suivant : "est-ce que mon contrôle est de type OptionButton". Si oui, tu affectes la propriété Caption (celle qui affiche le texte) avec le nom d'un fichier..

---

Oui, c'est çà que je souhaite parvenir à faire! Mais je n'ai malheureusement aucune idée du comment je peux mettre tout çà en musique.. :? Un petit code, ou début de code raccord au mien, serait vraiment le bienvenu.

Citation:

---

Envoyé par chrgillet

Oui, c'est çà que je souhaite parvenir à faire! Mais je n'ai malheureusement aucune idée du comment je peux mettre tout çà en musique.. :? Un petit code, ou début de code raccord au mien, serait vraiment le bienvenu.

---

Voici un petit lien qui explique ça.

Je te conseilles cependant d'utiliser les TreeView si tu as le temps de regarder comment ça fonctionne. Ca sera plus simple à manipuler côté développement et plus facile à appréhender côté utilisateur.

un tout grand merci
j'ai maintenant des bonnes pistes pour pouvoir avancer:bug: