Excel|如何用VBA函数求得当日的年、月、日期

 本帖最后由 纵鹤擒龙水中月 于 2011-2-25 11:42 编辑

谢谢你们！我想分开求取年、月、日期，一是根据当天的日期，求得年数，比如说今天是2011年11月25日，年数就是2011，月数就是2，日期就是2011-02-25
Sub 年月日()
MsgBox Format(Now(), "yyyy")
MsgBox Format(Now(), "mm")
MsgBox Format(Now(), "yyyy-mm-dd")
End Sub