Sub macro_overflow() Dim l As Integer l = 255 * 256 'overflow errorEnd SubSub macro_no_overflow() Dim l As Long l = 255& * 256 'now it worksEnd Sub