Tarihi sayıya çevirme hk.

[kemal turan]

Merhaba,
Tarih textbox3 değerini (28.01/2022) herhangi bir sayfa hücresine yazdırıyorum.
Bunu başka bir hücrede sayıya çevirip textbox3 change olayında textbox7 ye (44589) olarak alıyorum.
İsteğim
sayfa hücresi kullanmadan textbox3 change olayında textbox7 e nasıl bir kodla alabilirim.
Teşekkür ederim

 

[ÖmerFaruk]

TextBox7=Cdbl(TextBox3)

 

[AdemCan]

Merhaba, örnek olarak textbox3 den çıkış yaptığınız zaman Textbox7 ye sayısal değerini yazar.

Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox7.Value = CDate(TextBox3.Value) * 1
End Sub

 

[kemal turan]

merhaba Ömer faruk bey
değeri 28012022 olarak gösteriyor. 44589 olması lazım
teşekkür ederim.

 

[kemal turan]

Merhaba, örnek olarak textbox3 den çıkış yaptığınız zaman Textbox7 ye sayısal değerini yazar.

Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox7.Value = CDate(TextBox3.Value) * 1
End Sub

Teşekkür ederim.
Selametle kalınız.

 

[AdemCan]

Rica ederim.
Sizde Selametle kalınız.