- Katılım
- 5 Eylül 2007
- Mesajlar
- 1,247
- Excel Vers. ve Dili
- ofis 2010
formda çok değişik örnekleri taradım lakin çözemedim. aynı sorunu tarihte yaşamıştım çözmüştüm. form' da tarihi istediğimiz formatta görüp formatı bozulmadan kullanmak için 3' yere kod yazmamız gerekiyor şöyleki
2
3
sayı yazdığımızda formatı bozulmadan hangi yerlere kod yazmamız gerekiyor. kullanmak istediğim excel' in standart sayı formadı 1.200,35 gibi Şimdiden teşekkürler.
Kod:
With TextBox2 'TARİH FORMADI
.MaxLength = 10
.EnterFieldBehavior = fmEnterFieldBehaviorRecallSelection
.Text = "##.##.2016"
.SelStart = 0
.SelLength = 1
End With
Kod:
Private Sub TextBox2_Change()
With TextBox2 'TARİH FORMADI
.SelLength = 1
If .SelText = "." Then
.SelStart = .SelStart + 1
.SelLength = 1
End If
End With
Kod:
Private Sub UserForm_Initialize()
With TextBox3 'TARİH FORMADI
.MaxLength = 10
.EnterFieldBehavior = fmEnterFieldBehaviorRecallSelection
.Text = "##.##.2016"
.SelStart = 0
.SelLength = 1
End With
Son düzenleme:
