Vba Single Integer Definition