Perhaps

Formula: copy to clipboard
=MONTH(DATE(A1,1,A1*7))