excel如何計(jì)算指定間隔月后的日期

　　在excel當(dāng)中制作工作項(xiàng)目的完工表時(shí)，通常都需要算出間隔月后的日期，使用vba可以很輕易的計(jì)算指定的日期了。下面就跟學(xué)習(xí)啦小編一起看看吧。

　　excel計(jì)算指定間隔月后日期的步驟

　　1、首先我們打開一個(gè)工作樣表作為例子。

　　2、使用alt+f11組合快捷鍵進(jìn)入vbe編輯器，插入一個(gè)新的模塊，并在模塊中輸入以下代碼：

　　Option Explicit

　　Sub ddt()

　　Dim rq As Date

　　Dim lx As String

　　Dim n As Integer

　　Dim Msg

　　lx = "m"

　　rq = InputBox("請(qǐng)輸入一個(gè)日期")

　　n = InputBox("輸入增加月的數(shù)目：")

　　Msg = "新日期:" & DateAdd(lx, n, rq)

　　MsgBox Msg

　　End Sub

　　3、這里我們先對(duì)變量做聲明，其中rq變量為日期類型，lx為字符串，n為整數(shù)型。msg我并沒有設(shè)置具體類型，vba會(huì)將其默認(rèn)為可變類型variant。

　　4、稍微詳細(xì)的解釋一下代碼為什么會(huì)這樣寫，定義變量lx為一個(gè)字符串值，因?yàn)閐ateadd函數(shù)的必須參數(shù)1是一個(gè)字符串，這里做個(gè)定義其實(shí)等價(jià)于直接輸入。但是這樣便于閱讀。

　　5、輸入日期我們并沒有做錯(cuò)誤糾正，那么只有對(duì)excel了解的人，才會(huì)輸入正確的日期格式，這里我只做一個(gè)簡(jiǎn)單的示例，提示大家輸入2016/8/19這樣的格式日期。增加的月數(shù)我們是賦值給了n這個(gè)變量。

　　6、最后用msgbox來輸出最后的結(jié)果，其中，dateadd函數(shù)的第一參數(shù)是以月增加，第二參數(shù)是增加數(shù)，第三參數(shù)是指定的日期。運(yùn)行代碼我們可以得到結(jié)果。增加20個(gè)月后的結(jié)果。

excel計(jì)算日期的相關(guān)文章：

1.如何用excel計(jì)算時(shí)間間隔的方法

2.Excel2003時(shí)間計(jì)算方法詳解