Discussion :

[crebuffet]

Bonjour,

je souhaite récuperer la liste de fichiers type .dxf qui se trouve dans un répertoire.

Merci

[marcym]

Bonjour,

voici un fichier avec macro vba pour lister des fichiers d'un repertoire et également possibilité de les renommer.
Saisir chemin du repertoire et une partie du nom de fichier (ex. *dxf dans votre cas), puis cliquer sur bouton 'liste fichiers'.

Cordialement

[kiki29]

Salut,voir http://www.developpez.net/forums/d20...feuille-excel/ et adapter au contexte

PS MARCYM : plutôt que la saisie du répertoire Racine

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Option Explicit
 
Private Sub SelDossier()
    With Application.FileDialog(msoFileDialogFolderPicker)
        .InitialFileName = ThisWorkbook.path & "\"
        .Title = "Sélectionner le Dossier Racine"
        .AllowMultiSelect = False
        .InitialView = msoFileDialogViewDetails
        .ButtonName = "Sélection Dossier"
        .Show
        If .SelectedItems.Count > 0 Then ' .....
    End With
End Sub

[crebuffet]

Bonjour,

voici un fichier avec macro vba pour lister des fichiers d'un repertoire et également possibilité de les renommer.
Saisir chemin du repertoire et une partie du nom de fichier (ex. *dxf dans votre cas), puis cliquer sur bouton 'liste fichiers'.

Cordialement

Merci beaucoup.....