Turn 3 columns into 1

[David Stricklen]

I have 3 columns that I would like to be merged in to one. For example:

b2=3 c2=4 d2=6, and so e2 = 3
e3 = 4
e4 = 6

Thanks for anyone that can help

 

[Peo Sjoblom]

Copy and paste special and select transpose


--


Regards,


Peo Sjoblom

 

[Bob I]

Your example makes absolutely no sense, try again.

 

[Sandy Mann]

Shamelessly stealing from RB Smissert in the Programming group try:

Sub TurnIt()
Dim LastR As Long
Dim rRow As Long
Dim cCol As Long
Dim pRow As Long
Dim dData As Variant

LastR = Cells(Rows.Count, 2).End(xlUp).Row

dData = Range(Cells(2, 2), Cells(LastR, 4))
pRow = 1
For rRow = 1 To LastR - 1
For cCol = 1 To 3
pRow = pRow + 1
Cells(pRow, 5).Value = dData(rRow, cCol)
Next cCol
Next rRow
End Sub

--
HTH

Sandy
In Perth, the ancient capital of Scotland
and the crowning place of kings

(e-mail address removed)
Replace @mailinator.com with @tiscali.co.uk


Ok, it's a bit more complex than that. I should have mentioned that there is more than one row of info

B2=5 c2=5 d2=10
b3=8 c3=9 d3=11
b4=9 c4=11 d4=500, and then e2 would = 5
e3=5
e4=10
e5=8
e6=9
e7=11
e8=9, and so on


I have 3 columns that I would like to be merged in to one. For example:

b2=3 c2=4 d2=6, and so e2 = 3
e3 = 4
e4 = 6

Thanks for anyone that can help

 

[Gord Dibben]

Play with this entered in E2 and copied to E4

=INDEX($2:$2,ROWS($2:3))


Gord Dibben MS Excel MVP