Bonsoir à tous,
C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des
avertissements, voir les avertissements et autres messages.) réponses
possible : oui non aide
Ne pas afficher ou répondre non par défaut.
Merci d'avance
Gérard
La procédure pour mémoire :
Const NomArchive = "C:\tmp\zaza.zip" 'Nom du fichier Zip a créer
Const QuelFichier = "C:\tmp\Programme.bas" 'Nom du fichier à compresser
Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution
End Sub
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
YannX
Si il tourne sous DOS Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier & ">>NULL: ") ? (pas testé !) Sous Windows, il doit etre possible de récuperer la fenètre et de la tuer, ou de mettre la fenetre basic en avant plan permanent ! @+
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier) 'execution End Sub
Si il tourne sous DOS Shell (CheminWinZip & "winzip32.exe -a " &
NomArchive & " " & QuelFichier & ">>NULL: ") ? (pas testé !)
Sous Windows, il doit etre possible de récuperer la fenètre et de la tuer,
ou de mettre la fenetre basic en avant plan permanent !
@+
"G. L@rumeur" <sugere~KillPub~@online.fr> a écrit dans le message de
news:%23cBmMyzmEHA.3464@tk2msftngp13.phx.gbl...
Bonsoir à tous,
C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je
cherche
comment ne pas afficher le message généré par Winzip (Il y a des
avertissements, voir les avertissements et autres messages.) réponses
possible : oui non aide
Ne pas afficher ou répondre non par défaut.
Merci d'avance
Gérard
La procédure pour mémoire :
Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer
Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser
Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution
End Sub
Si il tourne sous DOS Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier & ">>NULL: ") ? (pas testé !) Sous Windows, il doit etre possible de récuperer la fenètre et de la tuer, ou de mettre la fenetre basic en avant plan permanent ! @+
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier) 'execution End Sub
Michel Pierron
Bonsoir G. ; Essaie en mode silencieux: "Winzip32 -min -a " MP
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier) 'execution End Sub
Bonsoir G. L@rumeur;
Essaie en mode silencieux:
"Winzip32 -min -a "
MP
"G. L@rumeur" <sugere~KillPub~@online.fr> a écrit dans le message de
news:%23cBmMyzmEHA.3464@tk2msftngp13.phx.gbl...
Bonsoir à tous,
C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je
cherche
comment ne pas afficher le message généré par Winzip (Il y a des
avertissements, voir les avertissements et autres messages.) réponses
possible : oui non aide
Ne pas afficher ou répondre non par défaut.
Merci d'avance
Gérard
La procédure pour mémoire :
Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer
Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser
Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution
End Sub
Bonsoir G. ; Essaie en mode silencieux: "Winzip32 -min -a " MP
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier) 'execution End Sub
G. L
Bonjour, Et merci Sauf si je n'ai pas fait le test correctement, ">>NULL: " n'est pas accepté. Effectivement la solution est certainement une réponse par défaut mais je ne sais pas comment.
Gérard
"YannX" a écrit dans le message de news:%
Si il tourne sous DOS Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier & ">>NULL: ") ? (pas testé !) Sous Windows, il doit etre possible de récuperer la fenètre et de la tuer, ou de mettre la fenetre basic en avant plan permanent ! @+
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution End Sub
Bonjour,
Et merci
Sauf si je n'ai pas fait le test correctement, ">>NULL: " n'est pas accepté.
Effectivement la solution est certainement une réponse par défaut mais je ne
sais pas comment.
Gérard
"YannX" <ydx_nospam@yahoo.fr> a écrit dans le message de
news:%23UWjc1zmEHA.1844@TK2MSFTNGP12.phx.gbl...
Si il tourne sous DOS Shell (CheminWinZip & "winzip32.exe -a " &
NomArchive & " " & QuelFichier & ">>NULL: ") ? (pas testé !)
Sous Windows, il doit etre possible de récuperer la fenètre et de la tuer,
ou de mettre la fenetre basic en avant plan permanent !
@+
"G. L@rumeur" <sugere~KillPub~@online.fr> a écrit dans le message de
news:%23cBmMyzmEHA.3464@tk2msftngp13.phx.gbl...
Bonsoir à tous,
C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je
cherche
comment ne pas afficher le message généré par Winzip (Il y a des
avertissements, voir les avertissements et autres messages.) réponses
possible : oui non aide
Ne pas afficher ou répondre non par défaut.
Merci d'avance
Gérard
La procédure pour mémoire :
Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer
Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser
Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " &
QuelFichier)
Bonjour, Et merci Sauf si je n'ai pas fait le test correctement, ">>NULL: " n'est pas accepté. Effectivement la solution est certainement une réponse par défaut mais je ne sais pas comment.
Gérard
"YannX" a écrit dans le message de news:%
Si il tourne sous DOS Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier & ">>NULL: ") ? (pas testé !) Sous Windows, il doit etre possible de récuperer la fenètre et de la tuer, ou de mettre la fenetre basic en avant plan permanent ! @+
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution End Sub
G. L
Bonjour Michel, Et merci J'ai oublié d'écrire que ce message apparait alors que suis déjà *Winzip32 -min -a*, je ne savais pas que c'était le mode silencieux, j'accepte volontier une explication.
Gérard
"Michel Pierron" a écrit dans le message de news:
Bonsoir G. ; Essaie en mode silencieux: "Winzip32 -min -a " MP
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution End Sub
Bonjour Michel,
Et merci
J'ai oublié d'écrire que ce message apparait alors que suis déjà
*Winzip32 -min -a*, je ne savais pas que c'était le mode silencieux,
j'accepte volontier une explication.
Gérard
"Michel Pierron" <michel.pierron@free.fr> a écrit dans le message de
news:uM4sFn1mEHA.2680@TK2MSFTNGP15.phx.gbl...
Bonsoir G. L@rumeur;
Essaie en mode silencieux:
"Winzip32 -min -a "
MP
"G. L@rumeur" <sugere~KillPub~@online.fr> a écrit dans le message de
news:%23cBmMyzmEHA.3464@tk2msftngp13.phx.gbl...
Bonsoir à tous,
C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je
cherche
comment ne pas afficher le message généré par Winzip (Il y a des
avertissements, voir les avertissements et autres messages.) réponses
possible : oui non aide
Ne pas afficher ou répondre non par défaut.
Merci d'avance
Gérard
La procédure pour mémoire :
Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer
Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser
Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " &
QuelFichier)
Bonjour Michel, Et merci J'ai oublié d'écrire que ce message apparait alors que suis déjà *Winzip32 -min -a*, je ne savais pas que c'était le mode silencieux, j'accepte volontier une explication.
Gérard
"Michel Pierron" a écrit dans le message de news:
Bonsoir G. ; Essaie en mode silencieux: "Winzip32 -min -a " MP
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution End Sub
Michel Pierron
Bonjour G. ; AMHA, si tu as un ou des messages, c'est que la commande n'est pas conforme. A tout hasard, essaie ainsi (je pense que les Chr(34) qui te manquent sont à l'origine du problème): Const PathWinZip As String = "C:program fileswinzipWinzip32" Dim strShell As String: strShell = PathWinZip & " -min -a " & " " & Chr(34) & NomArchive & Chr(34) & " " & Chr(34) & QuelFichier & Chr(34) Shell strShell, vbHide
MP
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier) 'execution End Sub
Bonjour G. L@rumeur;
AMHA, si tu as un ou des messages, c'est que la commande n'est pas conforme.
A tout hasard, essaie ainsi (je pense que les Chr(34) qui te manquent sont à
l'origine du problème):
Const PathWinZip As String = "C:program fileswinzipWinzip32"
Dim strShell As String:
strShell = PathWinZip & " -min -a " & " " & Chr(34) & NomArchive & Chr(34) & " " &
Chr(34) & QuelFichier & Chr(34)
Shell strShell, vbHide
MP
"G. L@rumeur" <sugere~KillPub~@online.fr> a écrit dans le message de
news:%23cBmMyzmEHA.3464@tk2msftngp13.phx.gbl...
Bonsoir à tous,
C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des
avertissements, voir les avertissements et autres messages.) réponses
possible : oui non aide
Ne pas afficher ou répondre non par défaut.
Merci d'avance
Gérard
La procédure pour mémoire :
Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer
Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser
Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution
End Sub
Bonjour G. ; AMHA, si tu as un ou des messages, c'est que la commande n'est pas conforme. A tout hasard, essaie ainsi (je pense que les Chr(34) qui te manquent sont à l'origine du problème): Const PathWinZip As String = "C:program fileswinzipWinzip32" Dim strShell As String: strShell = PathWinZip & " -min -a " & " " & Chr(34) & NomArchive & Chr(34) & " " & Chr(34) & QuelFichier & Chr(34) Shell strShell, vbHide
MP
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier) 'execution End Sub
G. L
Merci Michel, J'ai appliqué ta procédure, mais winzip est inflexible il m'assène du même message contenant : Début: Action: Ajouter (et Remplacer) Fichiers Récursivité: oui Sauver Chemin Complet: non Ajoute Enreg_MD_2004916.xls Avertissement: Le fichier suivant est déjà ouvert par un autre programme. Si ce programme Avertissement: écrit dans le fichier pendant que WinZip compresse le fichier, l'archive Avertissement: peut être endommagée :C:tempEnreg_MD_2004916.xls copie de l'archive Fin Si je faisais un seul enregistrement je n'insisterai pas mais comme ma macro tourne avec une boucle pour enregistrer une dizaine de fichiers zippés c'est pénalisant d'être obligé de répondre à ce foutu message ;( Par contre c'est très formateur ;)
Gérard
"Michel Pierron" a écrit dans le message de news:
Bonjour G. ; AMHA, si tu as un ou des messages, c'est que la commande n'est pas conforme.
A tout hasard, essaie ainsi (je pense que les Chr(34) qui te manquent sont à
l'origine du problème): Const PathWinZip As String = "C:program fileswinzipWinzip32" Dim strShell As String: strShell = PathWinZip & " -min -a " & " " & Chr(34) & NomArchive & Chr(34) & " " &
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
'execution End Sub
Merci Michel,
J'ai appliqué ta procédure, mais winzip est inflexible il m'assène du même
message contenant :
Début:
Action: Ajouter (et Remplacer) Fichiers Récursivité: oui Sauver Chemin
Complet: non
Ajoute Enreg_MD_2004916.xls
Avertissement: Le fichier suivant est déjà ouvert par un autre programme. Si
ce programme
Avertissement: écrit dans le fichier pendant que WinZip compresse le
fichier, l'archive
Avertissement: peut être endommagée :C:tempEnreg_MD_2004916.xls
copie de l'archive
Fin
Si je faisais un seul enregistrement je n'insisterai pas mais comme ma macro
tourne avec une boucle pour enregistrer une dizaine de fichiers zippés c'est
pénalisant d'être obligé de répondre à ce foutu message ;(
Par contre c'est très formateur ;)
Gérard
"Michel Pierron" <mpierron@europtest.com> a écrit dans le message de
news:uQVQID8mEHA.596@TK2MSFTNGP11.phx.gbl...
Bonjour G. L@rumeur;
AMHA, si tu as un ou des messages, c'est que la commande n'est pas
conforme.
A tout hasard, essaie ainsi (je pense que les Chr(34) qui te manquent sont
à
l'origine du problème):
Const PathWinZip As String = "C:program fileswinzipWinzip32"
Dim strShell As String:
strShell = PathWinZip & " -min -a " & " " & Chr(34) & NomArchive & Chr(34)
& " " &
"G. L@rumeur" <sugere~KillPub~@online.fr> a écrit dans le message de
news:%23cBmMyzmEHA.3464@tk2msftngp13.phx.gbl...
Bonsoir à tous,
C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je
cherche
comment ne pas afficher le message généré par Winzip (Il y a des
avertissements, voir les avertissements et autres messages.) réponses
possible : oui non aide
Ne pas afficher ou répondre non par défaut.
Merci d'avance
Gérard
La procédure pour mémoire :
Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer
Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser
Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " &
QuelFichier)
Merci Michel, J'ai appliqué ta procédure, mais winzip est inflexible il m'assène du même message contenant : Début: Action: Ajouter (et Remplacer) Fichiers Récursivité: oui Sauver Chemin Complet: non Ajoute Enreg_MD_2004916.xls Avertissement: Le fichier suivant est déjà ouvert par un autre programme. Si ce programme Avertissement: écrit dans le fichier pendant que WinZip compresse le fichier, l'archive Avertissement: peut être endommagée :C:tempEnreg_MD_2004916.xls copie de l'archive Fin Si je faisais un seul enregistrement je n'insisterai pas mais comme ma macro tourne avec une boucle pour enregistrer une dizaine de fichiers zippés c'est pénalisant d'être obligé de répondre à ce foutu message ;( Par contre c'est très formateur ;)
Gérard
"Michel Pierron" a écrit dans le message de news:
Bonjour G. ; AMHA, si tu as un ou des messages, c'est que la commande n'est pas conforme.
A tout hasard, essaie ainsi (je pense que les Chr(34) qui te manquent sont à
l'origine du problème): Const PathWinZip As String = "C:program fileswinzipWinzip32" Dim strShell As String: strShell = PathWinZip & " -min -a " & " " & Chr(34) & NomArchive & Chr(34) & " " &
"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:%
Bonsoir à tous, C'est génial, j'utilise en boucle, la procédure trouvée / FAQ et je cherche
comment ne pas afficher le message généré par Winzip (Il y a des avertissements, voir les avertissements et autres messages.) réponses possible : oui non aide Ne pas afficher ou répondre non par défaut. Merci d'avance Gérard
La procédure pour mémoire : Const NomArchive = "C:tmpzaza.zip" 'Nom du fichier Zip a créer Const QuelFichier = "C:tmpProgramme.bas" 'Nom du fichier à compresser Shell (CheminWinZip & "winzip32.exe -a " & NomArchive & " " & QuelFichier)
