See what the value returned...

Code:
LastYearSales = Val(lastY.Text)
Debug.Print LastYearSales
Add the line, and then look in the debug.window, or place a breakpoint (F9) and step thru the code.
It should not be hard to find.