Need VBA to combine cells in a column

[skyport]

I have data in multiple cells in column E. I need to join them all together in cell K1. Please help.

 

[Peter_SSs]

Peter, would it make a difference if this has to be run on excel 2000, which is the case here.

It could well be but I have no idea. A 15 year old version is out of my realms of memory or testing.
Time to upgrade!!!

Here is another suggestion to try

Sub JoinThem2()
  Dim i As Long
  Dim s As String
  
  For i = 1 To Range("E" & Rows.Count).End(xlUp).Row
    s = s & Cells(i, "E").Value
  Next i
  Range("K1").Value = s
End Sub

 

[skyport]

Peter, thankfully that code did the job. Thanks so much. Regarding upgrading excel, amazingly the newer versions will not do what the old 2000 version will do and I must stock with it for this particular job. I am so happy you got around the issue and once again solved what no one else could. Take care of those birds that come to the back yard.

 

[Peter_SSs]

.. amazingly the newer versions will not do what the old 2000 version will do ..

What sorts of things? - I can't remember that far back.

 

[skyport]

It wouldn't be so much the types of things that most everyone would look at and be involved with. It more pertains to the way things were displayed when using other software programs in conjunction such as Dragon voice recognition. In some cases, the newer versions of Excel and Dragon don't allow some things to be done in the manner I have to do them where as the older version does. I ended up taking excel 2007 off and reinstalling the 2000 for this reason. It simply was not allowing the work to be done in the same way as with 2000, which is mostly a visual display issue as well as how it handles the voice recognition for auto complete of a cell.