Transposition of data

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi,
I have some data in the column A of a sheet and in another sheet of the same file, I need to use the same data but horizontaly this time : I need that A2 in first sheet come in B1, A3 in C1, A4 in D1...
And I don't want just the data, I need to this to update itself his the first data change. I have try to do in column a of the ne sheet A1 =A1, A2=A2... and the n copy it to do a pastespecial formula-transpose, but it doesn't work...
Thanks for any hel
Happy Christma
Benjamin
 
Sub TransposeLink()
Dim rng As Range
Dim rw As Long
Set rng = Worksheets("sheet1").Cells(Rows.Count, 1).End(xlUp)

For rw = 1 To rng.Row - 1
With Worksheets("Sheet2")
.Cells(1, rw).Formula = "=Sheet1!A" & rw + 1
End With
Next
End Sub


--
Regards,
Tom Ogilvy

Ben.c said:
Hi,
I have some data in the column A of a sheet and in another sheet of the
Click to expand...
same file, I need to use the same data but horizontaly this time : I need
that A2 in first sheet come in B1, A3 in C1, A4 in D1....
And I don't want just the data, I need to this to update itself his the
Click to expand...
first data change. I have try to do in column a of the ne sheet A1 =A1,
A2=A2... and the n copy it to do a pastespecial formula-transpose, but it
doesn't work....
 
Thanks a lot Tom !
I am stupid, I didn't think to use a & in the formula....
I think I need to go on holidays..
Merry christmas to you To
Benjamin
 
Back
Top