Copying and pasting from one column to another one by one by pressing a button

[andrewsy03]

Hi guys. Kinda new to VBA and need some help.

I'd like to create a Button that copies data from column A in every other column every time the button is pressed.

I did this as my code but when I run the macro, it pastes the data all at the same time, not one by one. Where did I go wrong?

Please Login or Register  to view this content.

[sktneer]

Try this......

Please Login or Register  to view this content.

[FDibbins]

Hi and welcome to the forum

Please take a moment to read the forum rules and then amend your thread title to something descriptive of your problem. Once you have done this please send me a PM and I will remove this request. (Also, include a link to your thread - copy from the adress bar)

To change a Title on your post, click EDIT POST then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.

[andrewsy03]

Try this......

Please Login or Register  to view this content.

Thanks for this sktneer.

It works well. I do hope you can explain the code a little to me.

What's the purpose of setting "lc" as Integer?

Also, what does the "End(xlToLeft)" code mean?

Thanks in advance

[sktneer]

Please read this......

http://www.ozgrid.com/VBA/ExcelRanges.htm