Tarihi sayıya çevirme

[excelmaster]

Forumda aradım ama istediğim şeyi bulamadım.

TARİHTANIMLAMA adını verdiğim değer inputbox ile bugünün tarihini veriyor. Bu tarih değerini sayıya çevirmek istiyorum.

Yani TARİHTANIMLAMA="14.07.2010" olarak geliyor. Ben bunu sayı değerine (40373) çevirmek istiyorum.

TARİHTANIMLAMA = InputBox(prompt:="TARİH DOĞRU MU ?", Title:="TARİHİ TANIMLA", Default:=DATE)

 

[Necdet]

Merhaba,

Tam anlamadım ama örneği inceleyiniz.

Sub aa()
TARİHTANIMLAMA = CDbl(CDate(InputBox(prompt:="TARİH DOĞRU MU ?", Title:="TARİHİ TANIMLA", Default:=Date)))
MsgBox TARİHTANIMLAMA
End Sub

 

[excelmaster]

Necdet Bey aynen istediğim gibi oldu. Yardımınız için teşekkür ederim.

:bravo: