返回列表 上一主題 發帖

textbox的值如何指定為今天日期

minture3

帖子
50 
主題
8 
精華
0 
積分
54 
點名
0  
作業系統
windows7 
軟體版本
EXCEL 2007 
閱讀權限
20 
性別
男 
註冊時間
2015-3-24 
最後登錄
2015-7-13 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-4-22 11:24 | 只看該作者

textbox的值如何指定為今天日期



小弟想在自定表單中指定textbox1的預設值為今日日期
請教各位以下程式碼應該如何修改?
  1. Private Sub UserForm_Activate()
  2. TextBox1.Value = Sheet1.Range("E5")
  3. End Sub
複製代碼
收藏 分享

lpk187

帖子
552 
主題
3 
精華
0 
積分
578 
點名
0  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
50 
性別
男 
註冊時間
2015-2-8 
最後登錄
2024-7-9 

2016猴年全勤獎章2015羊年全勤獎章熱烈參與勳章
2#
發表於 2015-4-22 13:26 | 只看該作者
回復 1# minture3


Private Sub UserForm_Activate()
TextBox1.Value = Date
End Sub

TOP

minture3

帖子
50 
主題
8 
精華
0 
積分
54 
點名
0  
作業系統
windows7 
軟體版本
EXCEL 2007 
閱讀權限
20 
性別
男 
註冊時間
2015-3-24 
最後登錄
2015-7-13 
3#
發表於 2015-4-22 14:02 | 只看該作者
回復 2# lpk187

感謝!!
早上打錯datr還以為不能這樣使用!!

TOP

        靜思自在 : 【是否發揮了良能？】人間壽命因為短暫，才更顯得珍貴。難得來一趟人間，應問是否為人間發揮了自己的良能，而不要一味求長壽。
返回列表 上一主題