An overflow results when you try to make an assignment that exceeds the limitations of the target of the assignment. This error has the following causes and solutions:
Assign the value to a variable of a type that can hold a larger range of values.
Make sure your assignment fits the range for the property to which it is made.
Dim x As Long
x = 2000 * 365 ' Error: Overflow
To work around this situation, type the number, like this:
Dim x As Long
x = CLng(2000) * 365
For additional information, select the item in question and press F1 (in Windows) or HELP (on the Macintosh).