excelde veri isimli userformda sayfa6 üzerinde abc ve cba olarak 20 adet checkbox kutuları var abc kutuları % 18 , cba % 8 olarak işlem yapmaktadır. Aşağıdaki kodu döngü ile yapabilirmiyim.
'---------------YÜZDE DÖNGÜSÜ -------------------
If veri.ABC1.Value = True Then
veri.ABC1.Value = True
[F10] = " % 18"
[G10] = WorksheetFunction.Sum([E10] * 18 / 100 + [E10])
Else
veri.ABC1.Value = False
[F10] = ""
If veri.CBA1.Value = True Then
veri.CBA1.Value = True
[F10] = " % 8"
[G10] = WorksheetFunction.Sum([E10] * 8 / 100 + [E10])
Else
veri.CBA1.Value = False
[F10] = ""
End If
End If
'---------------YÜZDE DÖNGÜSÜ -------------------
If veri.ABC1.Value = True Then
veri.ABC1.Value = True
[F10] = " % 18"
[G10] = WorksheetFunction.Sum([E10] * 18 / 100 + [E10])
Else
veri.ABC1.Value = False
[F10] = ""
If veri.CBA1.Value = True Then
veri.CBA1.Value = True
[F10] = " % 8"
[G10] = WorksheetFunction.Sum([E10] * 8 / 100 + [E10])
Else
veri.CBA1.Value = False
[F10] = ""
End If
End If
