Skip to main content
Announcements
Have questions about Qlik Connect? Join us live on April 10th, at 11 AM ET: SIGN UP NOW
cancel
Showing results for 
Search instead for 
Did you mean: 
Not applicable

Macro for autominimising the objects in current active sheet..(Please post comments in any, for my further improvement)



sub

mat

'Rem minimize all active sheet objects on active sheet

set

s=ActiveDocument.ActiveSheet

for

i=lbound(objs) to ubound

(objs)

msgbox

(objs(i).GetCaption.Name.v)

next

end

sub







1 Solution

Accepted Solutions
spsrk_84
Creator III
Creator III

Hi Vidya,

Macro to Auminimize the sheetobjects

Sub Minimize

Set S=ActiveDocument.Sheets("main")

For i=0 to S.NoofSheetsobjects-1

S.Sheetobjects(i).Minimize)

next

End Sub

Try the above

Cheers,

Ajay

View solution in original post

1 Reply
spsrk_84
Creator III
Creator III

Hi Vidya,

Macro to Auminimize the sheetobjects

Sub Minimize

Set S=ActiveDocument.Sheets("main")

For i=0 to S.NoofSheetsobjects-1

S.Sheetobjects(i).Minimize)

next

End Sub

Try the above

Cheers,

Ajay