Value copying

[mfmalthaf]

i have a excel file and i want to copy some values in Column A to Column D. I want a macro to do this. need to take account of following when writing the macro.
1. All values in column A not needed to be copied to column D. values one after another needed to be copied.
2. last row which contains a value that need to be copied to column D can be change time to time.

I recorded below macro but i think this is not the best one to carry out above requirement. I have attached the excel sheet for your reference.

Please Login or Register  to view this content.

Thnks.


Moderator Edit:

Welcome to the forum, mfmalthaf.

Please notice that code tags have been added to your post. The forum rules require them so please keep that in mind and add them yourself whenever showing code in any of your future posts. To see instructions for applying them, click on the Forum Rules button at the top of the page and read Rule #3.
Thanks.

[Winon]

As a matter if interest, why do you need a Macro for this?

[AB33]

a simplified version of your code.

Please Login or Register  to view this content.

[mfmalthaf]

What i have uploaded here is a just a example of the actual document. Actual document could have about 100-150 lines and i get 300 of such documents daily. so its very convenient if i have a macro to do this

[AB33]

Please Login or Register  to view this content.

[mfmalthaf]

This doesn't work.
Your first macro worked but even it worked only for one cell

[HaHoBe]

Hi, mfmalthaf,

change the code line

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

But I donīt see a need for a loop here.

Please Login or Register  to view this content.

should work without the loop.

Ciao,
Holger

[HSV]

Please Login or Register  to view this content.

[mfmalthaf]

Ciao this works...but if i extended the values of column A further down then macro doesn't work for the extended values (Please see point 2 in my post)

[mfmalthaf]

HSV this works really well...Thank you...

[Winon]

Should the Code not be:

Please Login or Register  to view this content.

[AB33]

Sorry for missing D3 from my line. Yes this line works if you extended your data to last row

Please Login or Register  to view this content.

This shows you from row 3 up your last row data on column "C"

[HSV]

No Winon,
Step 2 means:
4,6,8 etc.
Cells(i,1) = cells(4,1)
next
cells(i,1) = cells(6,1)

[Winon]

@ HSV,

Hi Harry,

Very sorry about that, I completely missed this in the Thread:

All values in column A not needed to be copied to column D. values one after another needed to be copied.

[HSV]

To @Winon,

That can happen.