VBA code not running automatically

Below is the formula avaible in cell A1

=EDATE(DATE(C2,MONTH(1&B2),1),1)-1

In C2 cell i will update the year manually

In B2, cell is dropdown list where in i will select the months like January, February and based on this Cell A1 gives me the last date of the month.