Kod:
Private Sub CommandButton4_Click()
CommandButton2.Enabled = True
If (Brut + tmp3) > SSKTavan Then
SSKPrim = Format(SSKTavan * tmp1 / 100, "#,##0.00")
GoTo Rutin
End If
SSKPrim = Format((Brut + tmp3) * tmp1 / 100, "#,##0.00")
Rutin:
Issizlik = Format((Brut + tmp3) * tmp2 / 100, "#,##0.00")
Kod:
SSKPrim = Format(SSKTavan * tmp1 / 100, "#,##0.00")
Kod:
SSKPrim = Format((Brut + tmp3) * tmp1 / 100, "#,##0.00")
Yukarıda döngü ilişkisi kurarken bir hata yaptım diye düşünüyorum çünkü 1.koşul gerçekleştiğinde SSKPrim = 0 oluyor.
if then else kodlarıyla nasıl çözebilirim yada bir başka yolu var mı?
(brüt ile tmp3 ün toplamı ssktavan dan büyükse 1.formulü değilse
2.formülü işleme al)