Excel Vba Maximum Integer Value