Dates to First Day of Month

I am having date in one column and next column i am applying formula =C10-DAY(C10)9+1 to find first date of month. This formula is working well however i want to automate this process through VBA.

From Active selection of Column (Date Column) , one column to be inserted in right side and then the above formula to be applied. i will be selected entire column, the formula to be applied only for where its having dates. Some one please help me to provide VBA code for this.

Hi Keebellah.

Thanks for your help.

The date column is not fixed one. Some time it is A or B. Hence I mentioned selection of date column. Like if I have date in column H, then I will selection of column H, column I to be created and formula to be updated

Try the below code … You don't need to select the whole column just select any cell in the column you need to run the macro from

Please Login or Register  to view this content.

Hi NANKW83

Thanks it's worked. Thanks for your help.

Hi Nankw83

on the result column, i want to change the date format as "MM-YY". i have added

Formula:

Please Login or Register  to view this content.

but its not working. can you please help

As Keebellah explained, you can incorporate the .NumberFormat as below in your code. In case you want this number format for the whole column instead of only the used range of the newly added column, delete the red section in the code

Please Login or Register  to view this content.

Hi Nakw83

Working as expected.....