Formülleri VBA Kodları ile Yazma

Bu dosya, Excel formülü yerine VBA koduyla koşullu hesaplama yapmayı gösteren makrolu bir örnektir. A1 hücresine girilen sayıya göre A5 hücresindeki sonuç, sayfa üzerindeki bir olay makrosu tarafından hesaplanır.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: Örneğin yer aldığı sayfadır. A1 hücresi 12, C1 hücresi 2, E1 hücresi 3 ve G1 hücresi 4 değerini taşır. B, D ve F sütunlarındaki açıklama metinleri hangi sayı aralığında hangi çarpımın kullanılacağını belirtir.

Sayfalarda hücre formülü bulunmaz; hesaplama tamamen makro ile yapılır.

Makrolar​

• Worksheet_SelectionChange (Sayfa1 kod bölümü): Sayfada seçili hücre her değiştiğinde otomatik çalışır. A1 değeri 0'dan küçükse A5 boşaltılır. A1 değeri 6 veya altındaysa A5 hücresine B1 ile C1 çarpımı yazılır. A1 değeri 6 ile 12 arasındaysa (12 dahil) D1 ile E1 çarpımı, 12 ile 20 arasındaysa (20 dahil) F1 ile G1 çarpımı yazılır. A1 değeri 20'den büyükse A5 değiştirilmez.
• DeğerDeğiştirici5_Değiştir (Module1): F1 hücresini seçer, Calculate komutuyla hesaplamayı yeniler ve F1 hücresini yeniden seçer.

Makrolarda dosya silme ya da dış bağlantı gibi işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
2. Sayfa1'de A1 hücresine 0 ile 20 arasında bir sayı yazın.
3. Sayfada herhangi bir hücreye tıklayarak seçimi değiştirin; A5 hücresinde sonuç güncellenir.
4. Çarpım değerlerini değiştirmek için C1, E1 ve G1 hücrelerindeki sayıları ve B1, D1, F1 hücrelerindeki çarpanları düzenleyin.
5. Kodu incelemek için Alt+F11 ile VBA düzenleyicisini açıp Sayfa1 ve Module1 bölümlerine bakın.