NEED HELP WITH EASY MACRO COPY PASTE/EXCEL

Closed
SCHRAMBOW - Mar 7, 2009 at 05:53 PM
darwinchin Posts 2 Registration date Thursday October 1, 2009 Status Member Last seen October 1, 2009 - Oct 1, 2009 at 11:50 PM
Hello,
JUST GETTING STARTED WITH MACRO'S,

GOT TO BE EASY FOR ANYONE, BASIC,

I HAVE A COLUMN A, THAT HAS DATA IN ONE COLUMN, SEE BELOW EXAMPLE SHEET, HOW CAN I SEPERATE EACH ITEM OF DATA AND PUT INTO COLUMNS TO RIGHT (SEPARATE OUT THE DATA FROM ONE COLUMN AND PUT EACH SEPARATE ITEM INTO ITS OWN COLUMN TO RIGHT OF IT EXAMPLE B,C,D,E).
I CAN DO WITH MACRO RECORDING ON ONE ROW, BUT I CAN'T FIGURE OUT HOW TO MAKE IT GO TO THE NEXT ROW (RE: COPY THE MACRO TO HUNDREDS OF THE SAME ROW I JUST DID?)

14828 02/18/09 5416.88 5417 5416.88
14829 02/18/09 5373.48 5373 5373.48
14870 02/23/09 5811.03 5811 5811.03
14871 02/23/09 5633.84 5634 5633.84
14872 02/23/09 4945.45 4945 4945.45
14946 02/26/09 5601.29 5601 5601.29
14981 03/02/09 5861.65 5862 5861.65
29539 02/26/09 4727.41 4727 4727.41

APPRICIATE ANY ADVISE.
THANKS
Related:

2 responses

darwinchin Posts 2 Registration date Thursday October 1, 2009 Status Member Last seen October 1, 2009 1
Oct 1, 2009 at 11:50 PM
Hi everyone,

I have just started learning Macro, but now i have a problem and hope you can help me with. Thanks in Advance.
I am working on a dataset which looks like this (its a stock volatility series)...

A B C D E F.....
1 1 1 1 1 1
2 2 2 2 2 2
3 3 3 3 3 3
4 4 4 4 4 4
5 5 5 5 5 5
. . . . . . . .
. . . . . . . .
. . . . . . . .

I would like to copy all the value in Column B and paste them to the end of Column A, and then copythe entire column C to the end of column A, and then copy and paste column D to end of column A and so on. Hence, i would like column A to have all the data from all columns.
The problem is i have 200 columns and 830 rows for each column to work with, let alone 15 other spread sheets, if I am to copy and paste them accordingly. I hope you guys can help me in this respect.

thanks much in advnace
1
Hope this helps!


Sub SeparateColumn()

Dim SepInfo As Range

Set SepInfo = Columns(1)

SepInfo.TextToColumns Destination:=Range("B1"), DataType:=xlDelimited, Space:=True

End Sub
0
thank you so much,
you have no idea how much you have helped me and how much time you have saved me replying right away.
i would love to learn how to know how you did this and the language of these scripts/macro's. For looking at these macro's for the first time, i don't have any understanding of this language but would love to know where to start learning this.

Again, Thanks SO MUCH, for taking a bit of your time for helping me out.

Thank you Thank you!!

Corey
0