Discussion :

[sash6]

Bonjour,

J'ai une question par rapport à la réponse suivante: http://www.developpez.net/forums/sho...d.php?t=301568

Est-il possible de spécifier le chemin en utilisant l'explorateur. Pour l'instant, le mieux que j'ai réussi à faire, c'est d'utiliser une inputbox...Toute utilisation du code ci dessus avec un explorateur ne marche pas...

[ouskel'n'or]

Je ne comprends pas ta question. Que veux-tu faire ?

[sash6]

En fait, je veux utiliser ton code pour faire une macro sur l'ensemble d'un dossier, c'est à dire: ouvrir un fichier, le traiter et passer au suivant... Mais je souhaite que l'utilisateur puisse séléctionner, avec l'explorateur, le dossier à traiter.

[tonton fred]

Bonjour,

Une tite fonction qui ouvre une boite de dialogue de selection de dossier:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Public Function fctSelectFolder() As String
 
Dim Dlg As FileDialog
 
Set Dlg = Application.FileDialog(msoFileDialogFolderPicker)
Dlg.Show 'show a dialog box to pick folder
 
If Dlg.SelectedItems.Count <> 0 Then
fctSelectFolder = Dlg.SelectedItems(1)  'pushing cancel makes the procedure to crash if not present
 
End If
 
End Function

[sash6]

Mille merci tonton!!! J'ai essayé plein de macros qui m'ouvraient juste l'explorateur puis ça plantait...En fait il fallait faire une fonction