Worksheet data Transfer (from Coloumn to Rows)

[2pac]

Hi Excel VB Experts,

I am having some difficulty on creating the right VB macro to work

Ok here is what I need to accomplish

Whenever I type any character from Column A the output will be reflected to sheet2 row number 1

There are two worksheets sheet1 and sheet2.

Under sheet1:

A B
1 dell
2 hp
3 maxtor
4 western
5 avaya
6 seagate

I want sheet2 to output it like this

A B C D E F
1 dell hp Maxtor western avaya seagate
2
3
4
5
6

So my problem is whenever I delete all the data from column A and re-enter apple, orange, mango
The output look like this

A B C D E F
1 apple orange mango western avaya seagate
2
3
4
5
6

What I want is to somehow append the data “NOT overwrite the data” and so on

e.g.

A B C D E F
1 dell hp Maxtor western avaya seagate
2 apple orange mango
3
4
5
6

here is the code

Please Login or Register  to view this content.

Note: by the way I need to highlight select all the data and run the macro script…Is there a way I can do this automatically without running the macro manually like whenever I enter a data in sheet1 A column the data will automatically transfer to Sheet2 and does append the data

Thanks

[DonkeyOte]

Based on your example of A1:A6 being transposed you could possibly use a Worksheet_Change event:

Please Login or Register  to view this content.

The above would only fire when A6 on Sheet1 was altered (non-blank)...not truly clear if this meets requirements or not...

To insert the code right click on the Sheet1 tab in native XL select View Code and paste the above into resulting window.

[2pac]

Hi DonkeyOte,

Really appreciate the reply but the code somehow work but it seems like it has a bug?

when ever I input data from A1 to A6 the data are copied to sheet2 but it start in A2 would it be possible to start in A1?

and if I input data from A1 to A7 and so on or I just input from A1 to A2 the output is not working...


just to add information here are the thing that I would like to happen

on sheet 1

whenever I type any data from A1 to A#(regardless the number of cell I don't want to be limited from A1 to A6) I would like the output to be present in sheet2 (e.g. its like what I see in sheet1 A1 to A# I also want to see in sheet2 but horizontally and should start in A1 in sheet2)

and the most updated entry should be on top (you can teach me on how to code them in reverse e.g. bottom data are the latest)

I don't have a very good background in creating VB macro so please forgive me if I ask too much

Thanks

[DonkeyOte]

Please Login or Register  to view this content.

The above will insert the A range into row 1 on 2nd sheet whenever a value in A range is altered (to non-blank)