Bu dosya, Excel çalışma sayfasının üzerine yerleştirilmiş düğmeler ve metin kutularıyla toplama, çıkarma, çarpma ve bölme yapan bir hesap makinesi örneğidir. Hesaplama hücre formülleriyle değil, sayfaya bağlı VBA koduyla yapılır.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sheet1: Hesap makinesinin tüm arayüzü bu sayfadadır. Sayfada 0-9 arası rakam düğmeleri, nokta düğmesi, işlem seçim düğmeleri (OptionButton), iki sayı kutusu, işlem işareti kutusu, sonuç kutusu, eşittir düğmesi ve temizleme düğmesi bulunur.
Makrolar
Kod Sheet1 sayfasının modülündedir ve sayfadaki denetimlerin olaylarına bağlıdır.- Rakam ve nokta düğmeleri (CommandButton1-11): Basılan rakam ya da nokta, o anda etkin olan sayı kutusunun sonuna eklenir.
- TextBox1 ve TextBox3: Birinci ve ikinci sayı kutusudur. Bir kutudan çıkıldığında o kutu kilitlenir, diğeri yazmaya açılır; düğmelerle girilen değer kilitli olan kutuya yazılır.
- İşlem seçenekleri (OptionButton2-5): Sırasıyla +, -, * ve / işlemlerini seçer. İşlem işareti TextBox2 kutusuna yazılır, sonuç TextBox5 kutusunda görünür. Bölmede ikinci sayı 0 ya da boşsa "Error - Hata" iletisi verilir.
- CommandButton12: Seçili işleme göre sonucu yeniden hesaplar.
- TextBox1_Change ve TextBox3_Change: Sayılar değiştikçe sonuç otomatik güncellenir.
- CommandButton13: Tüm kutuları temizler ve ilk işlem seçeneğini işaretler.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Birinci sayıyı rakam düğmeleriyle girin; ondalıklı sayı için nokta düğmesini kullanın.
- İşlem seçeneklerinden +, -, * ya da / seçin.
- İkinci sayı kutusuna geçip ikinci sayıyı girin.
- Sonuç sağdaki sonuç kutusunda anında görüntülenir; gerekirse eşittir düğmesine basın.
- Yeni işlem için temizleme düğmesini kullanın.