:mrgreen: comme il fait (comme fait microsoft sur le msdn) c'est bien aussi : For Each fi As FileInfo In di.GetFiles("*.gz") Decompress(fi) Next