Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Combobox et liste des fichiers d'un répertoire

Combobox et liste des fichiers d'un répertoire

2 réponses
Avatar
Tucky
Bonjour à tous,

J'ai une ComboBox dans une feuille et je souhaiterai ajouter dans cette
ComboBox la liste des fichiers Excel qui sont dans le répertoire dans lequel
est enregistré mon fichier Excel (afin de les ouvrir en sous-main pour
pouvoir charger les données).

Merci de votre aide.

Tucky
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
JLuc
Tucky avait soumis l'idée :
Bonjour à tous,

J'ai une ComboBox dans une feuille et je souhaiterai ajouter dans cette
ComboBox la liste des fichiers Excel qui sont dans le répertoire dans lequel
est enregistré mon fichier Excel (afin de les ouvrir en sous-main pour
pouvoir charger les données).

Merci de votre aide.

Tucky
Essaie avec ca :


Private Sub UserForm_Initialize()
Fichiers = Dir(Thisworkbook.Path & "*.xls")
While Fichiers <> ""
ComboBox1.AddItem Fichiers
Fichiers = Dir()
Wend
End Sub

--
JLuc

Avatar
Tucky
Merci, c'est exactement ce que je cherchais.

Tucky


Tucky avait soumis l'idée :
Bonjour à tous,

J'ai une ComboBox dans une feuille et je souhaiterai ajouter dans cette
ComboBox la liste des fichiers Excel qui sont dans le répertoire dans lequel
est enregistré mon fichier Excel (afin de les ouvrir en sous-main pour
pouvoir charger les données).

Merci de votre aide.

Tucky
Essaie avec ca :


Private Sub UserForm_Initialize()
Fichiers = Dir(Thisworkbook.Path & "*.xls")
While Fichiers <> ""
ComboBox1.AddItem Fichiers
Fichiers = Dir()
Wend
End Sub

--
JLuc