Bu dosya, bir UserForm üzerindeki üç OptionButton ile iki TextBox içindeki tutarların para birimini değiştirmeyi gösteren makro örneğidir. Seçilen birime göre tutarlar iki ondalık basamakla biçimlendirilir ve sonlarına TL, $ veya € eklenir.
Dosyanın içeriği
- exceldestek.com | exceldepo.com sayfası: B2:F10 aralığında formül içermeyen çalışma sayfasıdır; formu açan düğme veya alan bu sayfada yer alır.
- UserForm1: Üç OptionButton (TL, $, €) ve iki TextBox (TextBox1, TextBox2) içeren kullanıcı formudur.
- Module1: Formu açan formac makrosunu içerir.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur.- formac: UserForm1 formunu açar.
- OptionButton1_Click: TextBox1 ve TextBox2 içindeki mevcut " $", " €" ve " TL" ekleri Replace ile temizlenir, değer FormatNumber ile iki ondalığa biçimlenir ve sonuna " TL" eklenir.
- OptionButton2_Click: Aynı işlemi yapar, sonuna " $" ekler.
- OptionButton3_Click: Aynı işlemi yapar, sonuna " €" ekler.
- UserForm_Click: Boş bir olay yordamıdır, işlem yapmaz.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Alt+F8 ile formac makrosunu çalıştırın; UserForm açılır.
- TextBox1 ve TextBox2 alanlarına sayısal tutarları girin.
- TL, $ veya € seçeneğinden birini işaretleyin; iki alandaki tutar seçilen para birimiyle gösterilir.
- Birimi değiştirmek için başka bir seçeneği işaretleyin; önceki ek otomatik temizlenir.