"Closing" all grouped rows in all sheets

Hi,

Is it possible to have a macro that will close all groups in all sheets? Like pressing 1 or - sign for each group. But to do it in a sweep, as users tend to forget to close them.
I searched it but couldn't find anything related to this.

A basic loop would be:

Please Login or Register  to view this content.

I included in my macros, but unfortunately, nothing has changed.

Can you post your workbook so I can see what's happening?