The macro is shutting down in the "With oSearchRange.Find" statement