2015-06-18 176 views
0

我有一個用戶通過userform.textbox.value輸入。我想切換到短日期的一般日期。 (或者試着讓時間下降,讓它讀取00:00)。我試過代碼格式日期VARIABLE到短日期VBA

sDate=format(date,(d))

但返回當前的日期,而不是沒有時間變量的日期。我主要只是想放棄時間,所以如果有一個更簡單的方法來做,我會接受這個想法。

回答

0

請參閱:Format function

用法:

'UserForm has a TextBox named TxtDate 
Dim myDate As Date, sDate As String 

myDate = Me.TxtDate 'DateSerial(2014,12,11) 

sDate = Format(myDate, "Short Date") 
'or 
sDate = Format(myDate, "yyyy/MM/dd") 
+0

這是基本相同的事情,如果我沒有弄錯。我開始時使用該頁面作爲參考。然而,我把你的代碼插入到我的代碼中,它返回了當前日期,而不是我提供的日期。 –

+0

查看更新後的答案;) –

+0

我想我並不十分清楚我想說什麼。 sDate來自用戶輸入的userform.textbox.value。所以這個選項也不是很有效。我的錯誤不明確 –