Bir sutunun yüzde 60 dan az olanı uyarma

[grafipark]

Merhaba arkadaşlar
Şöyle Bir sorum olacak

Diyelim ki A sutununda 100 adet iş var Eğer B sutunundaki değer A sutunundaki işin % 60 ise "Prim Var" yazılsın Yok eğer % 60 altında ise % 60'a varması için kaç adet işe ihtiyaç olduğunu C sutununa yazsın örnek dosya ekte

soruma cevap verecek tüm arkadaşlara şimdi

 

[dEdE]

Merhaba,
Aşağıdaki kodu kullanabilirsiniz.

Sub Yuzde()
For i = 2 To [A65536].End(3).Row
Hesap = Round(Cells(i, 2).Value * 100 / Cells(i, 1).Value,0)
If Hesap >= 60 Then
Cells(i, 3).Value = "Prim Var"
Else
Cells(i, 3).Value = 60 - Hesap
End If
Next
End Sub

Ek : Örnek dosyanızda C5 hücresindeki 10 değerini nasıl bulduğunuzu merak ettim. Sizin dediğiniz şekilde hesaplandığında 3.33 çıkıyor da.
Kod bunu 3 olarak alıyor. 3.33 olarak almasını istiyorsanız Round() kısmını silmelisiniz.

 

[excel41]

Kolay gelsin