Integer Vba Ilogic