在excel vba中爲單元格指定日期

Question

我只是試圖通過excel vba宏將當前日期輸入到單元格中。

以下是相同的代碼。

Cells(i,j).value = Format(Date, "mm-dd-yyyy") 

它給我

應用程序定義或對象定義的錯誤

Answer 1

Cells(i,j).value = Format(Now, "mm-dd-yyyy") 

Answer 2

你的代碼看起來不錯。但是，問題可能是您沒有聲明activesheet。或者看到什麼是i和j值：

debug.print i; j 
ActiveSheet.Cells(i,j).value = Format(Date, "mm-dd-yyyy") 

或

Worksheets(1).Cells(i,j).value = Format(Date, "mm-dd-yyyy") 

查看了一下有關範圍的對象位置： https://msdn.microsoft.com/en-us/library/office/ff838238.aspx