• Excel 2007 Not Hesaplama İşlemi

Excel 2007 Not Hesaplama İşlemi

Not Baremi (Puan Hesaplama);

Aşağıda Verilen Uygulamanın Sonucunda, Not Karşılıklarının Kod Haline Dönüştürülmesini Göreceksiniz.

0-39 Ff
40-49 Fd
50-54 Dd
55-59 Dc
60-69 Cc
70-74 Cb
75-84 Bb
85-89 Ba
90-100 Aa

Excel 2007 VBA Sayfasında Yeni Bir Modül Açınız Ve Bu Modüle Aşağıdaki Kodu Kaydediniz.

Kod: Tümünü seç

Function Puan(A As Integer)
    If A < 0 Then Puan = "Not Sıfırdan Küçük Olmaz"
    If A >= 0 And A <= 39 Then Puan = "Ff"
    If A >= 40 And A <= 49 Then Puan = "Fd"
    If A >= 50 And A <= 54 Then Puan = "Dd"
    If A >= 55 And A <= 59 Then Puan = "Dc"
    If A >= 60 And A <= 69 Then Puan = "Cc"
    If A >= 70 And A <= 74 Then Puan = "Cb"
    If A >= 75 And A <= 84 Then Puan = "Bb"
    If A >= 85 And A <= 89 Then Puan = "Ba"
    If A >= 90 And A <= 100 Then Puan = "Aa"
    If A > 100 Then Puan = "Notun 100 Den Büyük Olduğuna Emin Misiniz?"
End Function

İşte Hayali Bir tablao ve hesaplama;

Resim

Herkese İyi Günler
TRWE_2012
Düzce_Akçakoca
:oops: :oops: :) :)