Inseri a Macro que cria PowerSets