vba - fix off-by-one error in registers