Salut elhich, @christophe@, sebb, le forum
elhich, cette macro fonctionne, cela devrait te guider
Sub essai()
Dim Pkzip As String, FichZip As String, FichOri As String
Pkzip = "c:\windows\pkzip.exe" 'exe avec chemin
FichZip = "c:\windows\Test.zip" 'zip avec chemin
FichOri = "c:\windows\aoc.bmp" 'fichiers à zipper, génériques possibles
Shell Pkzip & " " & FichZip & " " & FichOri, vbNormalFocus
End Sub
Cordialement, A+