View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Ken Loomis Ken Loomis is offline
external usenet poster
 
Posts: 143
Default Hide shapes (buttons) before printing

Thanks, Tom.

That sub will help since I am still adding buttons to this worksheet and
won't need to individually set that as I go. Just run it at the end when I
am done.

Ken Loomis

"Tom Ogilvy" wrote in message
...
To expand on Geof's suggestion, right click on the shape and select Format
AutoShape. Go the properties tab and unselect Print Object.

Or you can run this one time

Sub Tester2()
Dim shp As Shape
For Each shp In ActiveSheet.Shapes
On Error Resume Next
shp.ControlFormat.PrintObject = False
On Error GoTo 0
Next
End Sub


--
Regards,
Tom Ogilvy

"Ken Loomis" wrote in message
...
So I now have shapes that acts as buttons on my worksheet thanks to help
I
got from this group.

Now I want to hide those shapes before I print out the report. So I plan

to
add a macro, called from yet another button, to do a print preview.

I'd like to hide those buttons before I do the print preview and then

unhide
them at the end of that macro.

From what I am begining to understand about the Exel object model, I

suspect
there is a collection of shapes on the workseeht and that each shape in

that
collection has a 'visible' property. Since all od the shaps on this
worksheet are button, I will want to hide all of them. And, I may even
get
button happy and add more shapes.

So my question is:

How do I hide/unhide all the shapes on a worksheet?

Thanks,
Ken Loomis