Некая процедура в форме снимает галки во всех флажках:
For Each ctl In Me.Controls
If TypeOf ctl Is CheckBox Then
ctl.Value = False
…вызов процедуры _Click ???
End If
Next ctl
но помимо этого для некоторых флажков существуют процедуры типа:
Private Sub chkDateLeg_Click()
On Error GoTo ErrorHandler
If Me!chkDateLeg.Value = True Then
Me!txtDateLeg.DefaultValue = """" & Me!txtDateLeg.Value & """"
Else
Me!txtDateLeg.DefaultValue = ""
End If
ErrorHandlerExit:
Exit Sub
ErrorHandler:
MsgBox "Ошибка №:" & Err.Number & ";Описание:" & Err.Description
Resume ErrorHandlerExit
End Sub
можно ли как-то для каждого флажка вызвать такую процедуру из цикла?