VBA convert variant to integer - Search