On Error Goto ErrorHandler
If False Then
ErrorHandler:
	Print "Error in OnDatapointChanged: ", Err.Number, Err.Description
	Err.Clear
	Exit Sub
End If