Con il codice seguente sono riuscito a:
- eseguire un controllo sui file zip all'interno della cartella;
- eseguire la decompressione degli stessi.

codice:
Sub UnZip()
	Set objShell = CreateObject("WScript.Shell")
	objProc = objShell.Run("unzip -t Y:\Cartella\*.zip", 0, True)
	objProc = objShell.Run("unzip -d Y:\Cartella\Output Y:\Cartella\*.zip", 0, True)
End Sub

UnZip()
Tutto ciò funziona, ma nel caso ci fosse qualche file danneggiato non lo decomprime e passa a quello successivo.
Io, invece, vorrei che se trova un file danneggiato proceda in questo modo:
- Termina lo shell;
- Elimina la cartella di Output.

Come faccio ad intercettare se un file è danneggiato ?!