excelvbadateoffice365

VBA Date in Office 365

I created project in VBA Office 2016 32bit and now I am trying running this in Office 365 32-bit (WIN10) and of course I had problem with DataPicker (solved) but now during running code I have error

Compile error: Can't find project or library

Problem is this:

currentMonth = Month(Date)

Do you have idea why "Date" can't show me today's date? In Excel 2016 no problems.

Solution

  • Date is not defined here. Is it defined elsewhere? Seems like Date has been redefined.

    This code will work for earlier versions too:

    Option Explicit

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

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