Sub DecompresserArchiveZip()
Const NOCONFIRMATION = 16
'définition des variables
Dim OShell As Object, XFiles As Object
Dim FRacine, FZip, FTemp, FUnzip, FNom ' par défaut type Varian
'informations sur l'archive et le dossier pour les fichiers décompressés
FNom = "NC AND NCV...