- ©«¤l
- 4901
- ¥DÃD
- 44
- ºëµØ
- 24
- ¿n¤À
- 4916
- ÂI¦W
- 92
- §@·~¨t²Î
- Windows 7
- ³nÅ骩¥»
- Office 20xx
- ¾\ŪÅv
- 150
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x¥_
- µù¥U®É¶¡
- 2010-4-30
- ³Ì«áµn¿ý
- 2025-4-17
               
|
- Sub nn()
- If IsDate([A1].Value) Then
- MsgBox Month([A1])
- Else
- MsgBox "Err"
- End If
- End Sub
½Æ»s¥N½X ¤£¹L¦pªG¿é¤J¼ÆÈ1~2958465
1900 ¦~ 1 ¤ë 1 ¤é(¼ÆȬ°1)¡]¦pªG¨Ï¥Î 1904 ¦~¤é´Á¨t²Î¡A«h¬° 1904 ¦~ 1 ¤ë 1 ¤é¡^
9999 ¦~ 12 ¤ë 31 ¤é(¼ÆȬ°2958465)
¦b¦¹¤§¶¡ªº¼ÆȤ]·|³Q»{¬°¬O¤é´Á |
|