Bonjour à tous,
J'ai un petit pb avec un bout de code pour ouvrir un répertoire
Sub PiècesJointes()
Dim chemin As String, objShell As Object, objfolder As Object
Set objShell = CreateObject("Shell.Application")
Set objfolder = objShell.BrowseForFolder(0, Message, 0, "E:\fichiers...