ç¨vbaåä¸ä¸ªèªå®ä¹å½æ°ã举ä¾è¯´æã
第ä¸æ¥ï¼ç¹å»å¼åå·¥å
·-visual basicã
第äºæ¥ï¼æå ¥æ¨¡åãç¼è¾ä»£ç å¦ä¸ï¼
Function lastyearday()
A = Date
myyear = Year(A)
mymonth = Month(A)
myday = Day(A)
lastyearday = DateSerial(myyear - 1, mymonth, myday)
End Function
æªå¾å¦ä¸ï¼
第ä¸æ¥ï¼éæ©d2ï¼è¾å ¥å ¬å¼ï¼=lastyearday()ãç»æå¦å¾ï¼
第åæ¥ï¼è®¾ç½®åå æ ¼æ ¼å¼ä¸ºæ¥æåç»æå¦å¾ï¼
不是今天,是去年今天
追答去过的就输入
=DATE(2012,1,11)