Find Fourth Saturday and Fifth Saturday of the month

Hi Seeking someone help to create VBA Code for the below.

I have dates in one column, (Column A) i need to update month in next column. (Column B)

Month is not exact date of column A. If the date before fourth Saturday of the month, then that month to be updated.

If the date is after Fourth Saturday of the month then next month to be updated.

There is another condition Regular month its Fourth Saturday, whereas Quarter its Fifth Saturday.

Example
Jan- 4th Saturday
Feb-4th Saturday
Mar-5th Saturday
Apr- 4th Saturday
May-4th Saturday
Jun-5th Saturday
Jul- 4th Saturday
Aug-4th Saturday
Sep-5th Saturday
Oct 4th Saturday
Nov-4th Saturday
Dec-5th Saturday

I am manually doing this its taking more time, it will will helpful if someone help me for VBA Code for this.

Hey ayyappan80,

Does the below code do what you need ?

Please Login or Register  to view this content.

Hi Nankw83

Thanks for your code. Yes its exactly as expected.
currently on output month coming in number format, can you please make it "MM" "YY".
And date column is fixed in A1, instead can you change to selection of column. (Column to be inserted in right side of date column selected)

I have updated the code to cater for your additional requirements. I am not sure about the number format you want to show but you can change it in the below code I have commented

Please Login or Register  to view this content.

Exactly working as expected. Thank you so much for your support