attention c'est ardu !!!

dom · 22 Janvier 2003

C'est re-moi alors re-bonsoir !!!

Au fait, question pour un collègue bien plus compliquée :

il travaille en réseau sur une machine Unix, sur laquelle il dépouille des données. Ces données sont ensuite transférées via FTP sur sa machine Windows NT, et stockées dans des fichiers .txt dans un dossier donné.
Bon jusque là rien à dire, le problème c'est qu'il aimerait, pour effectuer le traitement de ces données sous excel, avoir une liste déroulante dans une boite de dialogue ( combobox ) dans laquelle il pourrait visualiser le nom des fichiers .txt puis en choisir un....

Moi je sèche...et vous...là vraiment je m'excuse de la question.

Grand merci pour lui

chris · 23 Janvier 2003

Bonjour
vba : utiliser la fonction dir dans une boucle pour récupérer les noms de fichiers.
Après on peut contruire la liste avec ces noms.
Mais bon fichier ouvrir fait cela très bien.
Chris

Mytå · 25 Janvier 2003

Salut dom et chris

Deja pour lire les fichiers cette petite Macro

Sub lire_fichier()
Columns("A:A").ClearContents
Range("A1").Select
Set fs = Application.FileSearch
With fs
.LookIn = "C:\Mes documents"
.Filename = "*.txt"
.Execute
For i = 1 To .FoundFiles.Count
Cells(i, 1).Value = .FoundFiles(i)
Next i
If .FoundFiles.Count = 0 Then
MsgBox "Aucun fichier n'a été trouvé."
End If
End With

Ici je recupere des fichiers .txt dans le répertoire C:\Mes documents
a ajuster selon tes besoins.

Amitié Mytå

attention c'est ardu !!!

dom

Guest

chris

Guest

Mytå

Guest

Discussions similaires