Populating column based on specific cell value

[VKS]

Dear Experts,

In a workbook in all worksheets D1 has Month Last Year and E1 has Month This Year.

Eg.
Sheet 1 cell D1 contains ‘Jan-13 cell E1 ‘Jan-14
Sheet 2 cell D1 contains ‘Feb-13 cell E1 ‘Feb-14
We have 13 sheets (12 months and one total sheet)

What I want to do is

For each worksheet in the workbook

Insert column A
A1 .value = Month
All other rows in column A pick up the month from D1 of respective worksheet Eg Jan or Feb…..
Change D1 to 2013 iso ‘Jan-13 and Change E1 to 2014 iso ‘Jan-14
Best Regards/VKS

[JOHN H. DAVIS]

Maybe:

Please Login or Register  to view this content.

[VKS]

Thanks for your time and help John,
This gives me a run time error 13 Type Mismatch on

Please Login or Register  to view this content.

Best Regards/VKS

[JOHN H. DAVIS]

Can you provide a sample with a couple of sheets which it errors on? When I tested it on some dummy data, I didn't receive an error.

[VKS]

Attached is the file before running the code.
After running the code it gets stuck in sheet 14 column A1

Have also added the desired output in first two worksheets.
Thanks/VKS

[JOHN H. DAVIS]

Maybe:

Please Login or Register  to view this content.

I assumed Sheet14 is a Summary Sheet which should be treated differently?

[VKS]

Wowww.... Thanks for your help works beautifully.
You are right Sheet 14 is to be deleted and all individual sheets will be taken to one sheet to be used as source data of a pivot table.
Marking this as solved and you have my rep points for your help.

Since I have picked up little bit of VBA skills from the forum only and self training myself I have a question please see if you can help me understand
what is the difference between

Please Login or Register  to view this content.

and

Please Login or Register  to view this content.

and I have seen very few codes (that I requested help on) using

Please Login or Register  to view this content.

Do u think this link is appropriate to ask above or should I start a new thread
Best Regards/VKS

[JOHN H. DAVIS]

You're welcome. Glad to help out and thanks for the feedback and the reps. Activeworkbook can mean any workbook you choose to run the code on. Thisworkbook is where the code resides, therefore the macro can only be used on the worksheets in which the code resides. I know most will say ws.activate is not needed. Often however, when I put it in it makes some code which had been erroring out run? So I've become accustomed to using it.