VBA Office 365 中的日期

Question

我在 VBA Office 2016 32 位中創建了項目，現在我正在嘗試在 Office 365 32 位（WIN10）中運行它，當然我在使用 DataPicker 時遇到了問題（已解決），但現在在運行代碼時出現錯誤“編譯錯誤：不能查找項目或庫”。 問題是這樣的：

currentMonth = Month(Date)

你知道為什么“日期”不能顯示今天的日期嗎？ 在 Excel 2016 中沒有問題。

Answer 1

此處未定義日期。 是在別處定義的嗎？ 似乎日期已被重新定義。

此代碼也適用於早期版本：

Option Explicit

Sub test()
  Dim theDate as Date
  Dim currentMonth As Integer

  theDate = Now()
  currentMonth = Month(theDate)
  Debug.Print currentMonth
End Sub