Macro for 'Isolate'?

Hi I wonder if there a macro to isolate a selected object by hiding everything else in the document?
Thanks in advance.
Erik

'Invert Hide

Oh nice! Works. Thanks!