Minimize all objects

[Anonymous]

Hi guys,

Do you know how to minimize all charts in one click?

Thanks,

[Gysbert_Wassenaar · Accepted solution]

With a button that has an action added to it that runs a macro like below:

sub minimizeall()

    set s=ActiveDocument.Sheets("Main")

    for i=0 to s.NoOfSheetObjects-1

        s.SheetObjects(i).Minimize

    next

end sub

[jaimeaguilar]

Hi,

you can try creating a button and adding the action "minimize object" inside Layout category. So you can add an action for every object you wish to minimize when you click the button.

regards