Hi all,

suppose i have a number of similar controls (e.g Checkbox control) embedded
on a worksheet (not form controls, but using Control Toolbox) & i want to
change their Caption property for all the controls (checkboxes) to
Nothing( blank), & i want to do that by clicking another control say, a
Command Button ( embedded again on the worksheet) named say, RESET button,
how can i go about doing that.
please note that there is no form made here, but controls embedded on a
worksheet using Control toolbox.

Rgds,

Eijaz

Private Sub Reset_Click()
Dim oObj as OleObject
for each oObj in Me.OleObjects
if typeof oObj.Object is MSForms.Checkbox then
oObj.Object.Caption = ""
end if
Next
End Sub

--
Regards,
Tom Ogilvy


"gr8guy" wrote in message
...
Hi all,

suppose i have a number of similar controls (e.g Checkbox control)
embedded
on a worksheet (not form controls, but using Control Toolbox) & i want to
change their Caption property for all the controls (checkboxes) to
Nothing( blank), & i want to do that by clicking another control say, a
Command Button ( embedded again on the worksheet) named say, RESET button,
how can i go about doing that.
please note that there is no form made here, but controls embedded on a
worksheet using Control toolbox.

Rgds,

Eijaz