Notu Harfe Çevirme

Dosyanın içeriği​

• Sheet1: B sütununda "Ders Notu" başlığı altında örnek notlar (1, 11, 22, 33, 44, 55, 66, 77, 88, 99), D sütununda "Yöntem2" başlığı altında bu notların harf karşılıkları yer alır. Veriler B2:F13 aralığındadır.
• Module1: Degerlendirme1 ve Degerlendirme2 adlı iki fonksiyonu barındıran VBA modülü.

Kullanılan formüller​

=Degerlendirme1(B3)

Makrolar​

• Degerlendirme1: If...ElseIf yapısıyla çalışır. 9 ve altı A, 10-19 B, 20-29 C, 30-39 D, 40-49 E, 50-59 F, 60-69 G, 70-79 H, 80-89 I, 90 ve üzeri J harfini verir.
• Degerlendirme2: Aynı aralıkları Select Case yapısıyla uygular. Fark olarak, 100'e kadar olan notları J olarak kabul eder; 100 üzerindeki değerlerde sonuç boş döner.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. B sütununa harfe çevrilecek notları girin.
3. Harf sonucu istenen hücreye Degerlendirme1 veya Degerlendirme2 fonksiyonunu not hücresine bağlayarak yazın.
4. Formülü diğer satırlara aşağı doğru kopyalayın.
5. Başka bir çalışma kitabında kullanmak için Module1 modülünü o dosyaya kopyalayın.