textboxa yazdığım tarihi saklasın

[hamitcan]

Textboxa yazdığım tarihi saklasın ve userformu tekrar çağırdığımda textbox içinde sakladığım tarih çıksın.

Þimdiden Teşekkürler...

 

[Levent Menteşoğlu]

Textbox a yazılan tarihi bir değişkene atarsınız ve sonrasında bu değişkenden geri çağırabilirsiniz. Aklıma gelen şekilde açıklıyorum belki daha iyi yollar bulunabilir.

Userformu açan kodun bulunduğu modülün en üstüne aşağıdaki gibi örneğin "tar" isimli bir değişken tanımlayın.
[vb:1:04283194dd]Public tar As Date
Sub userformac()
UserForm1.Show
End Sub[/vb:1:04283194dd]

daha sonra textboxa ve userforma aşağıdaki kodları yazın.
[vb:1:04283194dd]Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = Format(TextBox1.Value, "dd.mm.yyyy")
tar = TextBox1.Value
End Sub

Private Sub UserForm_Initialize()
UserForm1.TextBox1 = Format(tar, "dd.mm.yyyy")
End Sub[/vb:1:04283194dd]

 

[hamitcan]

Sayın Leventm, verdiğiniz kodları denedim ama yapamadım,eksik birşey yapmış olabilirim.Ã?rnek dosya gönderebilirseniz sevinirim

İyi çalışmalar

 

[Levent Menteşoğlu]

Sn hamitcan

Yukarıda vermiş olduğum kodlar userformu butonla açınca çalışmadı bu nedenle textboxtaki değeri bir hücreye atayıp,sonrada hücreden geri çağıran bir yöntemle yapmış olduğum örneği ekliyorum.

 

[hamitcan]

Çok teşekkürler Sayın Leventm bana zaman ayırdığınız için, benim istediğimde böyle birşeydi zaten.

İyi Çalışmalar