Brilliant. Thank you so much!!
"Ron de Bruin" wrote:
Use this then
Sub test2()
Dim sh As Worksheet
ActiveSheet.Copy
Set sh = ActiveSheet
On Error Resume Next
sh.Buttons.Delete
On Error GoTo 0
End Sub
--
Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm
"JoeP" wrote in message ...
Yes it is.
"Ron de Bruin" wrote:
Hi Joe
Is it a Forms button ?
--
Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm
"JoeP" wrote in message ...
Ron,
Thanks for your help. Your code does what I asked for. The sheet that I want
to copy also contains a text box that I want to keep when copied. Is there
anyway to just delete the macro button and not all drawing objects. Thanks
again for your help.
"Ron de Bruin" wrote:
Basic code looks like this
Sub test()
Dim sh As Worksheet
ActiveSheet.Copy
Set sh = ActiveSheet
On Error Resume Next
sh.DrawingObjects.Visible = True
sh.DrawingObjects.Delete
On Error GoTo 0
End Sub
--
Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm
"JoeP" wrote in message ...
In Excel 2003 I have a worksheet that has a macro button on it. I would like
a macro that will do two things.
1. Make a copy of the sheet into a new workbook.
2. Delete the macro button on the newly created worksheet in the new book
and keep the macro button on the original worksheet.
Any help would be appreciated. Thanks.
JoeP