For Each sht In Sheets
For Each obj In sht.OLEObjects
ObjectType = TypeName(obj.Object)
If ObjectType = "CommandButton" Then
obj.Enabled = False
End If
Next obj
Next sht
--
joel
------------------------------------------------------------------------
joel's Profile: 229
View this thread:
http://www.thecodecage.com/forumz/sh...d.php?t=170670
Microsoft Office Help