Bu dosya, telefon numaralarının tek biçimde girilmesini sağlayan makrolu bir giriş formu içerir. Formdaki metin kutusuna rakamlar yazıldıkça numara otomatik olarak "(---) --- ----" kalıbına yerleştirilir; parantez, boşluk ve çizgiler kullanıcı tarafından yazılmaz.
Dosyanın içeriği
- exceldestek.com | exceldepo.com sayfası: A1:F11 aralığında yer alan çalışma sayfasıdır. Sayfada formül bulunmaz.
- UserForm1: Telefon numarasının girildiği TextBox1 metin kutusunu barındıran kullanıcı formudur.
- Module1: Formu açan form adlı makroyu içerir.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makrolar dosyayı silme veya dışarıya bağlantı kurma gibi işlemler yapmaz; yalnızca form içindeki metin kutusunu düzenler.- form: UserForm1 formunu ekranda açar.
- UserForm_Initialize: Form açılırken çalışan başlangıç prosedürüdür.
- TextBox1_KeyDown: Basılan tuşun kodunu alır. Geri silme (Backspace) tuşunda, kutudaki rakam sayısına göre silme sonrası konumu belirler.
- TextBox1_KeyPress: Metin kutusuna giriş sırasında tuş denetimi için kullanılır.
- TextBox1_Change: Üst sıradaki rakam tuşları ve sayısal tuş takımından gelen girişleri işler. Yazılan her rakam kalıptaki bir sonraki boşluğa yerleştirilir. Geri silme sırasında kalıbın çizgileri korunur, tüm rakamlar silindiğinde kutu "(---) --- ----" görünümüne döner. Numara 10 haneye ulaştığında giriş tamamlanmış sayılır.
Nasıl kullanılır
- Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
- Alt+F8 tuşlarıyla makro listesini açıp form makrosunu çalıştırın.
- Açılan formdaki metin kutusuna telefon numarasını yalnızca rakamlarla yazın; parantez ve boşluklar otomatik eklenir.
- Hatalı girişi düzeltmek için Backspace tuşunu kullanın; kalıp korunarak rakamlar tek tek silinir.