[XXE] Convenient ways to collapse all / open all / ... etc. elements in a document

[Itsme]

Are there any convenient ways to do this? If not, is it macro-able? Any 
suggestion on how I might get started with a macro to do this?

Thanks - Sophie