Oops! Change 'Int(i / 5) ' to 'Int(i - 1 / 5)'.

PS: You can also delete ', j As Long' - it's not used.