Dim bgg
For bgg = 1 To 17
If Application.WorksheetFunction.VLookup(CheckBox(bgg).Caption, Config.Range("b:e"), 4, 2) = "لا" Then
CheckBox(bgg).Caption.VALUE= FALSE
Else
End If
Next bgg
أريد تغيير قيم الـ CHECKBOXS البالغ عددها 17 حسب قيمة معينة إن كانت نعم أو لا
حاولت استخدام Controls يظهر لي الخطأ التالي: