Gunshin82
Messages postés37Date d'inscriptionjeudi 22 mars 2007StatutMembreDernière intervention10 décembre 2009
-
27 mars 2007 à 14:43
Gunshin82
Messages postés37Date d'inscriptionjeudi 22 mars 2007StatutMembreDernière intervention10 décembre 2009
-
27 mars 2007 à 17:02
Bonjour,
Voici la situation :
Je reçois un documents zip contenant 5 fichiers, avec des extensions différentes, par entreprise et j'ai plus de 200 entreprises, ce qui fait plus de 1000 fichiers. Je réussi à dézipper le fichier mais seulement dans ca totalité avec le code suivant :
'Extraire les fichiers
Dim exec, ZipFile, ZipDest As String
exec = "c:\Program Files\WinZip\winzip32 -e "
ZipFile = "\\parw0212004\PRODUCTION\FEEDBACK\200701\PFB200701_.zip "
ZipDest = "\\parw0212004\PRODUCTION\FEEDBACK\Dézippe\500009_200701\ "
Shell (exec & ZipFile & ZipDest)
Ce que je voudrais faire c'est d'extraire les fichiers correspondant à une seul entreprise (tout les fichiers contienne le code de l'entreprise correspondante à l'intérieur de sont nom par contre, pas au même emplacement) à l'aide du code entrer par l'utilisateur. Comment puis-je faire ??
Gunshin82
Messages postés37Date d'inscriptionjeudi 22 mars 2007StatutMembreDernière intervention10 décembre 2009 27 mars 2007 à 15:55
Le premier me convient d'après la description par contre, je ne suis pas familier avec l'installation des classes en VBA ni comment appeller les fonctions à l'intérieur de ces classes... Je débute un peu dans le domaine... Je suis habitué à faire de simple macro mais là, je pousse dans quelque chose qui est au delà de mon savoir... N'y-a-t'il rien à faire avec WinZip ?