Excel 怎麽用VBA代碼表示日期“今天”

1、打開桌面上的Excel表格，在新建壹個工作樣表。

2、接著使用alt+f11組合快捷鍵進入vbe編輯器，插入壹個新的模塊。

3、輸入以下代碼：Option ExplicitSub ddt()Dim rq As DateDim lx As StringDim n As IntegerDim Msglx = "m"rq = InputBox("請輸入壹個日期")n = InputBox("輸入增加月的數目：")Msg = "新日期:" &DateAdd(lx, n, rq)MsgBox MsgEnd Sub。

4、這裏先對變量做聲明，其中rq變量為日期類型，lx為字符串，n為整數型。msg並沒有設置具體類型，vba會將其默認為可變類型variant。

5、輸入日期並沒有做錯誤糾正，最好輸入2020/2/17這樣的格式日期。增加的月數是賦值給了n這個變量。

6、最後用msgbox來輸出最後的結果，就完成了。