comment déziper un fichier avev vba???

[albert]

bonjour forum, bonjour à tous,

je cherche à automatiser l'importation de fichiers Monep...
ils sont en zip

http://www.monep.fr/data/200303/20030303.zip

existe-t-il un moyen de dézipper automatiquement en vba???

d'avance merci

albert

 

[babou]

Bonjour,

Tu trouveras des infos sur les command line winzip ici : http://www.winzip.com/xcmdline.htm

Quant a quelques exemples de script vb :

http://dj.joss.free.fr/zip.htm

Les exemples donnes permettent de zipper. Mais tu peux aussi faire des extract avec l'option -e.

A+

 

[albert]

merci babou je vais voir tout de suite
albert

 

[A_binouze_drinker_among_others]

sur Excel Downloads, il y a une appli dans les goodies qui te donnera des pistes.

outre le site de daniel, tu trouveras des pistes là
<http://xlbysteph.free.fr/aideinformatique/interactionapplis.htm#Winzip>

et tu peux chercher sur <http://groups.google.fr> en tapant group:*fr.excel winzip

 

[babou]

Bonjour A_binouze_drinker_among_others,
Ca me fait penser a autre chose. Sais-tu comment l'on peut faire pour ecrire dans notepad a partir d'xl, et sauver ce fichier texte sous un nom bien defini ?
Je sais lancer notepad : shell ("c:\winnt\notepad.exe"). Mais pas ecrier dedans... Avec des sendkeys ?
Desole Albert de faire devier ce thread. Mais j'aimerais creer de maniere dynamique le fichier text dont il est question ci-dessus.
Merci de ta reponse.
Babou.

 

[albert]

merci babou, merci drinker,
je pense avoir trouvé sur le groupe winzip

http://groups.google.fr/groups?q=fr.excel+winzip&hl=fr&lr=&ie=UTF-8&oe=UTF-8&selm=%23mOV5l2pBHA.680%40tkmsftngp04&rnum=8

je vais essayer

cordialement

albert

 

[albert]

en relisant
http://dj.joss.free.fr/zip.htm

je cherche où mettre l'option -e pour faire des extract??

 

[babou]

Re,
Comme ecrit dans le lien que tu donnes precedemment.
Ex : 'str_DezipPath = "C:\Program Files\Accessoires\WinZip\WINZIP32.EXE" & " -e "
& Chr(34) & str_ZipFile & Chr(34) & " " & Chr(34) &
A+.

 

[albert]

... en effet....
merci

 

[seb]

salut je vousdrai dezip unjeu comment faire