Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel [Très Difficile] Compression (Suite)

[Très Difficile] Compression (Suite)

5 réponses
Avatar
Emcy
Salut,

Je viens de lire les reponses =E0 mon poste du 27 janvier.
Tout d'abord, je voulais bien compresser automatiquement=20
(grace =E0 une macro) en format .zip grace au logiciel=20
int=E9gr=E9 =E0 windows XP.
Pour le faire manuellement, il faut :
- Selectionner les fichiers dans l'explorateur
- Cliquer sur bouton droit=20
- Choisir Envoyer vers =3D> Dossier Compress=E9


Comme le disait Geedee ce syst=E8me ne permet pas :
1- de choisir le nom de l'archive (il faudra=20
renommer !!!!)
2- de cr=E9e l'archive =E0 un autre endroit qu'o=F9 se trouvent=20
les fichiers
(il faudra regrouper les fichiers avant de=20
compresser....)
3- de cr=E9er d'archive auto-extractible (pas de .exe)
4- l'extraction d'un =E9l=E9ment unique il faut tout extraire
(on peut cependant visualiser chaque =E9l=E9ment=20
(d=E9compression temporaire
lecture seule)
on peut =E0 ce moment alors enregistrer le fichier)
5- l'ajout dans une archive existante (du moins je n'ai=20
pas
encore reussi)
6- g=E9rer les autres type d'archives (Rar, Arj, Lharc,=20
Stuffit, etc...)

Cependant, il est quand m=EAme possible de faire des=20
fichiers auto-extractibles avec Windows XP en utilisant=20
le petit logiciel "C:\WINDOWS\SYSTEM32\IEXPRESS.EXE"
=3D> Peut-=EAtre est-il possible de g=E9rer ce logiciel via=20
VBA...

Je cherche donc =E0 compresser en format zip avec des=20
outils=20
install=E9s avec Windows XP, pour que ma macro soit=20
exportable le plus simplement possible (pas besoin=20
d'intaller de logiciel). Quelqu'un a-til une solution ?


Remarque : pour l'instant j'utilise le logiciel=20
totalement gratuit "7-Zip" =3D> il permet de compresser=20
dans pleins de format diff=E9rents. Pour ceux que =E7a=20
interesse, voila une macro pour compresser des fichiers=20
avec ce logiciel :
Sub Zip7Zip(NomDossier As String, Fichiers As=20
Collection) 'compression avec le logiciel 7-Zip

'NomDossier : nom du dossier o=F9 sont les fichiers =E0 zipper
'Fichiers : collection comportant tous les noms des=20
fichiers =E0 compresser

Dim ZipProg, CompDecompression, FormatCompression,=20
FichierZip, ListeFichier, Commande As String
Dim i As Integer

ChDir NomDossier
ZipProg =3D """C:\Program Files\7-ZIP\7z.exe"""
CompDecompression =3D "a"
FormatCompression =3D "-tzip"
FichierZip =3D """MonFichier" & ".zip"""

ListeFichier =3D ""
For i =3D 1 To Fichiers.Count
ListeFichier =3D ListeFichier & """" & Fichiers(i)=20
& """ "
Next i

Commande =3D ZipProg & " " & CompDecompression & " " &=20
FormatCompression & " " & FichierZip & " " & ListeFichier=20
& " -mx"

Shell (Commande)

MsgBox (Fichiers.Count & " fichiers compress=E9s")

End Sub
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Modeste
Bonjour Emcy,
Grrrrr...... *#?! CDO !!!!!
;-)))
si tu as la possibilité .... ?
Pour suivre le forum, tapes dans la barre d'adresse de
ton navigateur :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

sinon assures-toi que :
1- tu utilises le bouton "Repondre au Message"
2- tu rajoutes Re: dans l'objet (quand cela n'y est pas)

pour la compression XP :
je n'ai la possibilité d'installer aucun composant
logiciel sur ma machine !!!
(Createur d'innovation qu'ils disent !!!)

je ne peux donc te fournir aucune autre information...
@+


-----Message d'origine-----
Salut,

Je viens de lire les reponses à mon poste du 27 janvier.
Tout d'abord, je voulais bien compresser automatiquement
(grace à une macro) en format .zip grace au logiciel
intégré à windows XP.
Pour le faire manuellement, il faut :
- Selectionner les fichiers dans l'explorateur
- Cliquer sur bouton droit
- Choisir Envoyer vers => Dossier Compressé


Comme le disait Geedee ce système ne permet pas :
1- de choisir le nom de l'archive (il faudra
renommer !!!!)
2- de crée l'archive à un autre endroit qu'où se
trouvent

les fichiers
(il faudra regrouper les fichiers avant de
compresser....)
3- de créer d'archive auto-extractible (pas de .exe)
4- l'extraction d'un élément unique il faut tout extraire
(on peut cependant visualiser chaque élément
(décompression temporaire
lecture seule)
on peut à ce moment alors enregistrer le fichier)
5- l'ajout dans une archive existante (du moins je n'ai
pas
encore reussi)
6- gérer les autres type d'archives (Rar, Arj, Lharc,
Stuffit, etc...)

Cependant, il est quand même possible de faire des
fichiers auto-extractibles avec Windows XP en utilisant
le petit logiciel "C:WINDOWSSYSTEM32IEXPRESS.EXE"
=> Peut-être est-il possible de gérer ce logiciel via
VBA...

Je cherche donc à compresser en format zip avec des
outils
installés avec Windows XP, pour que ma macro soit
exportable le plus simplement possible (pas besoin
d'intaller de logiciel). Quelqu'un a-til une solution ?


Remarque : pour l'instant j'utilise le logiciel
totalement gratuit "7-Zip" => il permet de compresser
dans pleins de format différents. Pour ceux que ça
interesse, voila une macro pour compresser des fichiers
avec ce logiciel :
Sub Zip7Zip(NomDossier As String, Fichiers As
Collection) 'compression avec le logiciel 7-Zip

'NomDossier : nom du dossier où sont les fichiers à
zipper

'Fichiers : collection comportant tous les noms des
fichiers à compresser

Dim ZipProg, CompDecompression, FormatCompression,
FichierZip, ListeFichier, Commande As String
Dim i As Integer

ChDir NomDossier
ZipProg = """C:Program Files7-ZIP7z.exe"""
CompDecompression = "a"
FormatCompression = "-tzip"
FichierZip = """MonFichier" & ".zip"""

ListeFichier = ""
For i = 1 To Fichiers.Count
ListeFichier = ListeFichier & """" & Fichiers(i)
& """ "
Next i

Commande = ZipProg & " " & CompDecompression & " " &
FormatCompression & " " & FichierZip & " " &
ListeFichier

& " -mx"

Shell (Commande)

MsgBox (Fichiers.Count & " fichiers compressés")

End Sub


.



Avatar
Emcy
Comment ça marche ton système ? est-ce que quand on
envoie un mail c'est anonyme (je veux pas recevoir plein
de spam) ?

Quel sont les avantage de ce système (j'ai l'impression
que ça pourris les boites mail) ?



-----Message d'origine-----
Bonjour Emcy,
Grrrrr...... *#?! CDO !!!!!
;-)))
si tu as la possibilité .... ?
Pour suivre le forum, tapes dans la barre d'adresse de
ton navigateur :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

sinon assures-toi que :
1- tu utilises le bouton "Repondre au Message"
2- tu rajoutes Re: dans l'objet (quand cela n'y est pas)

pour la compression XP :
je n'ai la possibilité d'installer aucun composant
logiciel sur ma machine !!!
(Createur d'innovation qu'ils disent !!!)

je ne peux donc te fournir aucune autre information...
@+


-----Message d'origine-----
Salut,

Je viens de lire les reponses à mon poste du 27 janvier.
Tout d'abord, je voulais bien compresser
automatiquement


(grace à une macro) en format .zip grace au logiciel
intégré à windows XP.
Pour le faire manuellement, il faut :
- Selectionner les fichiers dans l'explorateur
- Cliquer sur bouton droit
- Choisir Envoyer vers => Dossier Compressé


Comme le disait Geedee ce système ne permet pas :
1- de choisir le nom de l'archive (il faudra
renommer !!!!)
2- de crée l'archive à un autre endroit qu'où se
trouvent

les fichiers
(il faudra regrouper les fichiers avant de
compresser....)
3- de créer d'archive auto-extractible (pas de .exe)
4- l'extraction d'un élément unique il faut tout
extraire


(on peut cependant visualiser chaque élément
(décompression temporaire
lecture seule)
on peut à ce moment alors enregistrer le fichier)
5- l'ajout dans une archive existante (du moins je n'ai
pas
encore reussi)
6- gérer les autres type d'archives (Rar, Arj, Lharc,
Stuffit, etc...)

Cependant, il est quand même possible de faire des
fichiers auto-extractibles avec Windows XP en utilisant
le petit logiciel "C:WINDOWSSYSTEM32IEXPRESS.EXE"
=> Peut-être est-il possible de gérer ce logiciel via
VBA...

Je cherche donc à compresser en format zip avec des
outils
installés avec Windows XP, pour que ma macro soit
exportable le plus simplement possible (pas besoin
d'intaller de logiciel). Quelqu'un a-til une solution ?


Remarque : pour l'instant j'utilise le logiciel
totalement gratuit "7-Zip" => il permet de compresser
dans pleins de format différents. Pour ceux que ça
interesse, voila une macro pour compresser des fichiers
avec ce logiciel :
Sub Zip7Zip(NomDossier As String, Fichiers As
Collection) 'compression avec le logiciel 7-Zip

'NomDossier : nom du dossier où sont les fichiers à
zipper

'Fichiers : collection comportant tous les noms des
fichiers à compresser

Dim ZipProg, CompDecompression, FormatCompression,
FichierZip, ListeFichier, Commande As String
Dim i As Integer

ChDir NomDossier
ZipProg = """C:Program Files7-ZIP7z.exe"""
CompDecompression = "a"
FormatCompression = "-tzip"
FichierZip = """MonFichier" & ".zip"""

ListeFichier = ""
For i = 1 To Fichiers.Count
ListeFichier = ListeFichier & """" & Fichiers(i)
& """ "
Next i

Commande = ZipProg & " " & CompDecompression & " " &
FormatCompression & " " & FichierZip & " " &
ListeFichier

& " -mx"

Shell (Commande)

MsgBox (Fichiers.Count & " fichiers compressés")

End Sub


.

.





Avatar
Modeste
Bonjour,
en fait tu utilises ton browser standard
par contre il faut modifier ton adresse
dans options
compte de News:

cf Microsoft :
http://support.microsoft.com/newsgroups/default.aspx

Newsgroups et le Spam

Pour éviter de recevoir des messages indésirables
(également appelées «Spam») sur votre compte de
messagerie habituel ou réel, nous vous conseillons de ne
pas utiliser ce dernier lorsque vous posez une question
ou que vous répondez dans un newsgroup quel qu'il soit.
Voici 2 principes de bases pour vous prémunir du spam :

Utiliser une adresse de messagerie légèrement modifiée -
Utiliser une version différente de votre adresse email
habituelle que d'autres utilisateurs pourront facilement
interpréter pour vous envoyer un message en personne mais
que les outils de Spam (robots) ne pourront pas
automatiquement récupérer. Si par exemple, votre adresse
email réelle est "",
vous pouvez utiliser "nom-email(supprimerceci)
@fournisseurinternet.com" comme adresse email modifiée.

Utiliser un compte de messagerie secondaire - Créer et
utiliser un compte de messagerie secondaire séparé de
votre messagerie habituelle pour poser des questions ou
répondre dans les newsgroups.

-----Message d'origine-----
Comment ça marche ton système ? est-ce que quand on
envoie un mail c'est anonyme (je veux pas recevoir plein
de spam) ?

Quel sont les avantage de ce système (j'ai l'impression
que ça pourris les boites mail) ?



-----Message d'origine-----
Bonjour Emcy,
Grrrrr...... *#?! CDO !!!!!
;-)))
si tu as la possibilité .... ?
Pour suivre le forum, tapes dans la barre d'adresse de
ton navigateur :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

sinon assures-toi que :
1- tu utilises le bouton "Repondre au Message"
2- tu rajoutes Re: dans l'objet (quand cela n'y est pas)

pour la compression XP :
je n'ai la possibilité d'installer aucun composant
logiciel sur ma machine !!!
(Createur d'innovation qu'ils disent !!!)

je ne peux donc te fournir aucune autre information...
@+


-----Message d'origine-----
Salut,

Je viens de lire les reponses à mon poste du 27
janvier.



Tout d'abord, je voulais bien compresser
automatiquement


(grace à une macro) en format .zip grace au logiciel
intégré à windows XP.
Pour le faire manuellement, il faut :
- Selectionner les fichiers dans l'explorateur
- Cliquer sur bouton droit
- Choisir Envoyer vers => Dossier Compressé


Comme le disait Geedee ce système ne permet pas :
1- de choisir le nom de l'archive (il faudra
renommer !!!!)
2- de crée l'archive à un autre endroit qu'où se
trouvent

les fichiers
(il faudra regrouper les fichiers avant de
compresser....)
3- de créer d'archive auto-extractible (pas de .exe)
4- l'extraction d'un élément unique il faut tout
extraire


(on peut cependant visualiser chaque élément
(décompression temporaire
lecture seule)
on peut à ce moment alors enregistrer le fichier)
5- l'ajout dans une archive existante (du moins je
n'ai



pas
encore reussi)
6- gérer les autres type d'archives (Rar, Arj, Lharc,
Stuffit, etc...)

Cependant, il est quand même possible de faire des
fichiers auto-extractibles avec Windows XP en
utilisant



le petit logiciel "C:WINDOWSSYSTEM32IEXPRESS.EXE"
=> Peut-être est-il possible de gérer ce logiciel via
VBA...

Je cherche donc à compresser en format zip avec des
outils
installés avec Windows XP, pour que ma macro soit
exportable le plus simplement possible (pas besoin
d'intaller de logiciel). Quelqu'un a-til une solution ?


Remarque : pour l'instant j'utilise le logiciel
totalement gratuit "7-Zip" => il permet de compresser
dans pleins de format différents. Pour ceux que ça
interesse, voila une macro pour compresser des
fichiers



avec ce logiciel :
Sub Zip7Zip(NomDossier As String, Fichiers As
Collection) 'compression avec le logiciel 7-Zip

'NomDossier : nom du dossier où sont les fichiers à
zipper

'Fichiers : collection comportant tous les noms des
fichiers à compresser

Dim ZipProg, CompDecompression, FormatCompression,
FichierZip, ListeFichier, Commande As String
Dim i As Integer

ChDir NomDossier
ZipProg = """C:Program Files7-ZIP7z.exe"""
CompDecompression = "a"
FormatCompression = "-tzip"
FichierZip = """MonFichier" & ".zip"""

ListeFichier = ""
For i = 1 To Fichiers.Count
ListeFichier = ListeFichier & """" & Fichiers(i)
& """ "
Next i

Commande = ZipProg & " " & CompDecompression & " " &
FormatCompression & " " & FichierZip & " " &
ListeFichier

& " -mx"

Shell (Commande)

MsgBox (Fichiers.Count & " fichiers compressés")

End Sub


.

.


.






Avatar
Emcy
Merci de ton aide mais je crois que je vais rester comme
avant

-----Message d'origine-----
Bonjour,
en fait tu utilises ton browser standard
par contre il faut modifier ton adresse
dans options
compte de News:

cf Microsoft :
http://support.microsoft.com/newsgroups/default.aspx

Newsgroups et le Spam

Pour éviter de recevoir des messages indésirables
(également appelées «Spam») sur votre compte de
messagerie habituel ou réel, nous vous conseillons de ne
pas utiliser ce dernier lorsque vous posez une question
ou que vous répondez dans un newsgroup quel qu'il soit.
Voici 2 principes de bases pour vous prémunir du spam :

Utiliser une adresse de messagerie légèrement modifiée -
Utiliser une version différente de votre adresse email
habituelle que d'autres utilisateurs pourront facilement
interpréter pour vous envoyer un message en personne
mais

que les outils de Spam (robots) ne pourront pas
automatiquement récupérer. Si par exemple, votre adresse
email réelle est "",
vous pouvez utiliser "nom-email(supprimerceci)
@fournisseurinternet.com" comme adresse email modifiée.

Utiliser un compte de messagerie secondaire - Créer et
utiliser un compte de messagerie secondaire séparé de
votre messagerie habituelle pour poser des questions ou
répondre dans les newsgroups.

-----Message d'origine-----
Comment ça marche ton système ? est-ce que quand on
envoie un mail c'est anonyme (je veux pas recevoir
plein


de spam) ?

Quel sont les avantage de ce système (j'ai l'impression
que ça pourris les boites mail) ?



-----Message d'origine-----
Bonjour Emcy,
Grrrrr...... *#?! CDO !!!!!
;-)))
si tu as la possibilité .... ?
Pour suivre le forum, tapes dans la barre d'adresse de
ton navigateur :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

sinon assures-toi que :
1- tu utilises le bouton "Repondre au Message"
2- tu rajoutes Re: dans l'objet (quand cela n'y est
pas)




pour la compression XP :
je n'ai la possibilité d'installer aucun composant
logiciel sur ma machine !!!
(Createur d'innovation qu'ils disent !!!)

je ne peux donc te fournir aucune autre information...
@+


-----Message d'origine-----
Salut,

Je viens de lire les reponses à mon poste du 27
janvier.



Tout d'abord, je voulais bien compresser
automatiquement


(grace à une macro) en format .zip grace au logiciel
intégré à windows XP.
Pour le faire manuellement, il faut :
- Selectionner les fichiers dans l'explorateur
- Cliquer sur bouton droit
- Choisir Envoyer vers => Dossier Compressé


Comme le disait Geedee ce système ne permet pas :
1- de choisir le nom de l'archive (il faudra
renommer !!!!)
2- de crée l'archive à un autre endroit qu'où se
trouvent

les fichiers
(il faudra regrouper les fichiers avant de
compresser....)
3- de créer d'archive auto-extractible (pas de .exe)
4- l'extraction d'un élément unique il faut tout
extraire


(on peut cependant visualiser chaque élément
(décompression temporaire
lecture seule)
on peut à ce moment alors enregistrer le fichier)
5- l'ajout dans une archive existante (du moins je
n'ai



pas
encore reussi)
6- gérer les autres type d'archives (Rar, Arj, Lharc,
Stuffit, etc...)

Cependant, il est quand même possible de faire des
fichiers auto-extractibles avec Windows XP en
utilisant



le petit logiciel "C:WINDOWSSYSTEM32IEXPRESS.EXE"
=> Peut-être est-il possible de gérer ce logiciel via
VBA...

Je cherche donc à compresser en format zip avec des
outils
installés avec Windows XP, pour que ma macro soit
exportable le plus simplement possible (pas besoin
d'intaller de logiciel). Quelqu'un a-til une
solution ?






Remarque : pour l'instant j'utilise le logiciel
totalement gratuit "7-Zip" => il permet de compresser
dans pleins de format différents. Pour ceux que ça
interesse, voila une macro pour compresser des
fichiers



avec ce logiciel :
Sub Zip7Zip(NomDossier As String, Fichiers As
Collection) 'compression avec le logiciel 7-Zip

'NomDossier : nom du dossier où sont les fichiers à
zipper

'Fichiers : collection comportant tous les noms des
fichiers à compresser

Dim ZipProg, CompDecompression, FormatCompression,
FichierZip, ListeFichier, Commande As String
Dim i As Integer

ChDir NomDossier
ZipProg = """C:Program Files7-ZIP7z.exe"""
CompDecompression = "a"
FormatCompression = "-tzip"
FichierZip = """MonFichier" & ".zip"""

ListeFichier = ""
For i = 1 To Fichiers.Count
ListeFichier = ListeFichier & """" & Fichiers(i)
& """ "
Next i

Commande = ZipProg & " " & CompDecompression & " " &
FormatCompression & " " & FichierZip & " " &
ListeFichier

& " -mx"

Shell (Commande)

MsgBox (Fichiers.Count & " fichiers compressés")

End Sub


.

.


.


.







Avatar
Emcy
Finalement, j'ai essayé : j'y comprend rien => pourquoi
les messages n'apparaissent-ils pas dans le même ordre ?


-----Message d'origine-----
Merci de ton aide mais je crois que je vais rester comme
avant

-----Message d'origine-----
Bonjour,
en fait tu utilises ton browser standard
par contre il faut modifier ton adresse
dans options
compte de News:

cf Microsoft :
http://support.microsoft.com/newsgroups/default.aspx

Newsgroups et le Spam

Pour éviter de recevoir des messages indésirables
(également appelées «Spam») sur votre compte de
messagerie habituel ou réel, nous vous conseillons de
ne


pas utiliser ce dernier lorsque vous posez une question
ou que vous répondez dans un newsgroup quel qu'il soit.
Voici 2 principes de bases pour vous prémunir du spam :

Utiliser une adresse de messagerie légèrement modifiée -

Utiliser une version différente de votre adresse email
habituelle que d'autres utilisateurs pourront
facilement


interpréter pour vous envoyer un message en personne
mais

que les outils de Spam (robots) ne pourront pas
automatiquement récupérer. Si par exemple, votre
adresse


email réelle est "",
vous pouvez utiliser "nom-email(supprimerceci)
@fournisseurinternet.com" comme adresse email modifiée.

Utiliser un compte de messagerie secondaire - Créer et
utiliser un compte de messagerie secondaire séparé de
votre messagerie habituelle pour poser des questions ou
répondre dans les newsgroups.

-----Message d'origine-----
Comment ça marche ton système ? est-ce que quand on
envoie un mail c'est anonyme (je veux pas recevoir
plein


de spam) ?

Quel sont les avantage de ce système (j'ai
l'impression



que ça pourris les boites mail) ?



-----Message d'origine-----
Bonjour Emcy,
Grrrrr...... *#?! CDO !!!!!
;-)))
si tu as la possibilité .... ?
Pour suivre le forum, tapes dans la barre d'adresse
de




ton navigateur :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

sinon assures-toi que :
1- tu utilises le bouton "Repondre au Message"
2- tu rajoutes Re: dans l'objet (quand cela n'y est
pas)




pour la compression XP :
je n'ai la possibilité d'installer aucun composant
logiciel sur ma machine !!!
(Createur d'innovation qu'ils disent !!!)

je ne peux donc te fournir aucune autre information...
@+


-----Message d'origine-----
Salut,

Je viens de lire les reponses à mon poste du 27
janvier.



Tout d'abord, je voulais bien compresser
automatiquement


(grace à une macro) en format .zip grace au logiciel
intégré à windows XP.
Pour le faire manuellement, il faut :
- Selectionner les fichiers dans l'explorateur
- Cliquer sur bouton droit
- Choisir Envoyer vers => Dossier Compressé


Comme le disait Geedee ce système ne permet pas :
1- de choisir le nom de l'archive (il faudra
renommer !!!!)
2- de crée l'archive à un autre endroit qu'où se
trouvent

les fichiers
(il faudra regrouper les fichiers avant de
compresser....)
3- de créer d'archive auto-extractible (pas de .exe)
4- l'extraction d'un élément unique il faut tout
extraire


(on peut cependant visualiser chaque élément
(décompression temporaire
lecture seule)
on peut à ce moment alors enregistrer le fichier)
5- l'ajout dans une archive existante (du moins je
n'ai



pas
encore reussi)
6- gérer les autres type d'archives (Rar, Arj,
Lharc,





Stuffit, etc...)

Cependant, il est quand même possible de faire des
fichiers auto-extractibles avec Windows XP en
utilisant



le petit logiciel "C:WINDOWSSYSTEM32IEXPRESS.EXE"
=> Peut-être est-il possible de gérer ce logiciel
via





VBA...

Je cherche donc à compresser en format zip avec des
outils
installés avec Windows XP, pour que ma macro soit
exportable le plus simplement possible (pas besoin
d'intaller de logiciel). Quelqu'un a-til une
solution ?






Remarque : pour l'instant j'utilise le logiciel
totalement gratuit "7-Zip" => il permet de
compresser





dans pleins de format différents. Pour ceux que ça
interesse, voila une macro pour compresser des
fichiers



avec ce logiciel :
Sub Zip7Zip(NomDossier As String, Fichiers As
Collection) 'compression avec le logiciel 7-Zip

'NomDossier : nom du dossier où sont les fichiers à
zipper

'Fichiers : collection comportant tous les noms des
fichiers à compresser

Dim ZipProg, CompDecompression, FormatCompression,
FichierZip, ListeFichier, Commande As String
Dim i As Integer

ChDir NomDossier
ZipProg = """C:Program Files7-ZIP7z.exe"""
CompDecompression = "a"
FormatCompression = "-tzip"
FichierZip = """MonFichier" & ".zip"""

ListeFichier = ""
For i = 1 To Fichiers.Count
ListeFichier = ListeFichier & """" & Fichiers(i)
& """ "
Next i

Commande = ZipProg & " " & CompDecompression & " " &
FormatCompression & " " & FichierZip & " " &
ListeFichier

& " -mx"

Shell (Commande)

MsgBox (Fichiers.Count & " fichiers compressés")

End Sub


.

.


.


.


.