afficher dans un combobox les fichiers d'un répertoire

@

@Christophe@

Guest

• 17 Novembre 2003

• #2

Bonjour Ben,

Voici le code à utilisé dans ton Userform:

Option Explicit
Dim Files As String

Private Sub UserForm_Initialize()
Files = Dir("C:\Documents and Settings\Christophe\Mes documents\Fichier Excel\*.*")
Do While Files <> ""
ComboBox1.AddItem Files
Files = Dir
Loop
End Sub


Bonne journée

@Christophe@

 

Vote positif 0 Vote négatif

B

ben

Guest

• 17 Novembre 2003

• #3

je vais essayer merci beaucoup pour ton aide

 

Vote positif 0 Vote négatif

J

juliette

Guest

• 18 Novembre 2003

• #4

bonjour à tous...

je souhaterai savoir quel code faut-il ajouter pour pouvoir ouvrir le fichier lorsqu'il est sélectionné ds la combobox?

merci pour votre éventuelle aide.

Juliette

 

Vote positif 0 Vote négatif