Believing
Altın Üye
- Katılım
- 19 Mayıs 2013
- Mesajlar
- 700
- Excel Vers. ve Dili
-
Office Pro 2019 TR 32 Bit
Windows Pro 10 TR 64 Bit
- Altın Üyelik Bitiş Tarihi
- 23-08-2028
Sayın Formdaş Arkadaşlar,
UserForm'da 24 adet olarak bulunan TextBox'lara tarih formatlı kayıt yaptırıyorum.
Aşağıdaki TextBox1 için yazılı olan prosedürü döngü ile tüm TextBox'lara uygulamak için kodu nasıl revize etmeliyim?
Saygılarımla,
UserForm'da 24 adet olarak bulunan TextBox'lara tarih formatlı kayıt yaptırıyorum.
Aşağıdaki TextBox1 için yazılı olan prosedürü döngü ile tüm TextBox'lara uygulamak için kodu nasıl revize etmeliyim?
Kod:
Private Sub TextBox1_Change()
Select Case TextBox1.SelStart
Case Is = 2, 5
TextBox1.SelText = "."
End Select
End Sub