excel VBA判斷閏年的代碼和方法
文章介紹通過excel的VBA代碼判斷閏年的方法。
我們在以前的文章介紹了使用excel內置的函數編寫公式來判斷年份屬于閏年還是平年,本文再介紹使用excel的VBA代碼來判斷閏年的方法。
在excel中,按下ALT+F11鍵,打開VBE器,插入——模塊,復制下面的VBA代碼,然后單擊“運行”命令運行即可實現VBA判斷閏年。
Sub 判斷閏年()Dim TmpOn Error GoTo skipTmp = CDate(InputBox("請輸入一個年份", "年份", Year(Now)) & "-2-29")MsgBox "是閏年!"Exit Subskip:MsgBox "不是閏年!"End Sub