Userform'unuzu kapatmadan üzerinde dört işlem yapın..

Bu şablon, veri girişi için kullanılan bir userform üzerinde formu kapatmadan dört işlem yapmayı sağlar. Tutar kutusuna sayı yazılırken işlem işareti basıldığında küçük bir hesaplama paneli açılır; sonuç hesaplanır ve panel gizlenir. Ayrı bir hesap makinesi açmaya gerek kalmaz.

Dosyanın içeriği​

• exceldestek.com | exceldepo.com: A1:E2 aralığında kayıtların yazıldığı sayfadır. Userform bu sayfadaki son dolu satırın altına kayıt ekler. Formülü yoktur.
• UserForm1: Beş metin kutusu (TextBox1 - TextBox5), kaydet düğmesi (CommandButton1), işlem panelini barındıran Frame1 ve paneli kapatan bir resim (Image1) içerir.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme ya da dışarıya bağlantı yoktur.

• FormAc: UserForm1 formunu açar. Sayfadaki bir düğmeye atanarak ya da Makrolar penceresinden çalıştırılabilir.
• TextBox5_KeyUp: TextBox5 tutar kutusunda yalnızca 0-9 rakamları kabul edilir. Sayıpad tuşlarından çarpma, toplama, çıkarma veya bölme işareti (KeyCode 106, 107, 109, 111) basıldığında kutudaki ifade TextBox6 kutusuna aktarılır, TextBox5 içindeki son karakter silinir, Frame1 paneli görünür olur ve imleç TextBox6 kutusuna geçer.
• TextBox6_KeyDown: Enter tuşuna basıldığında TextBox6 içindeki ifade A65536 hücresine formül olarak yazılıp hesaplanır. Sonuç 2 basamağa yuvarlanarak TextBox5 kutusuna yazılır, hücre temizlenir, panel gizlenir ve imleç TextBox5 kutusuna döner.
• CommandButton1_Click: TextBox1 - TextBox4 ve TextBox5 değerlerini sayfadaki son dolu satırın altına, yan yana beş sütun olarak yazar. TextBox5 değeri sayıya çevrilerek kaydedilir.
• Image1_Click: İşlem panelini işlem yapmadan gizler ve imleci TextBox5 kutusuna döndürür.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. FormAc makrosunu çalıştırarak userformu açın.
3. TextBox1 - TextBox4 alanlarını doldurun.
4. Tutar kutusuna ilk sayıyı yazın, ardından sayıpaddeki +, -, * veya / tuşuna basın; açılan panele ikinci sayıyı yazın.
5. Enter tuşuna basın; sonuç tutar kutusuna yazılır. İşlemden vazgeçmek için paneldeki resme tıklayın.
6. Kaydet düğmesine tıklayarak satırı sayfaya aktarın.