thanks shasur for your reply but i have done it with this..
:)
dim ctrl as controls
for each ctrl in me.controls
if typeof ctrl is CheckBox then
msgbox "this control is checkbox."
end if
next
thanks agian..take care!!!
Quote:
quote:Originally posted by Shasur
Hi
The following should help you
Dim ctl As Control
Dim ctlCount As Integer
Dim iTab As Integer
For Each ctl In UserForm2.Controls
If ctl.DisplayStyle = fmDisplayStyleCheckBox Then
MsgBox "Control is CheckBok"
End If
Next ctl
Cheers
Shasur
http://www.dotnetdud.blogspot.com
VBA Tips & Tricks (http://www.vbadud.blogspot.com)
|
DPK..