Meilleure réponse: ci-dessous exemple de code pour dézipper des fichiers se trouvant dans un répertoire donné Sub Unzip() Dim FSO As Object Dim ShApp As Object Dim dossier As Object, fichier As Object Dim répertoire_zip As String,...
forums.commentcamarche.net