Hi I got this from Tom which works great on my Office XP but does not work
on 97. I'm not really familiar with that! Is it that 97 does not recognise
these instructions? Help most respected!

Sub ABC()
Dim Obj As OLEObject
For Each Obj In Worksheets( _
"New Style 2006").OLEObjects
If TypeOf Obj.Object Is MSForms.CommandButton Then
Obj.Visible = Not Obj.Visible
End If
Next
End Sub

It was actually written and tested in Excel 97 when I posted it.

--
Regards,
Tom Ogilvy


"Karoo News" wrote in message
...
Hi I got this from Tom which works great on my Office XP but does not work
on 97. I'm not really familiar with that! Is it that 97 does not recognise
these instructions? Help most respected!

Sub ABC()
Dim Obj As OLEObject
For Each Obj In Worksheets( _
"New Style 2006").OLEObjects
If TypeOf Obj.Object Is MSForms.CommandButton Then
Obj.Visible = Not Obj.Visible
End If
Next
End Sub