Excel – How to add all previous cells to a cell using a function in Microsoft Excel

The non-programming way:

1. insert a new column, I'll call it B, next to your data column, which I'll call A.
2. set the value in cell 1 of the column to: =A1 & "T" (this appends a "T" to the end of the cell, if you need it at the beginning you can write ="T" & A1)
3. grab the cell-extender box thingy (sorry, I can't think of its proper name) at the bottom-right corner of the highlighted cell) and drag down 10,000 cells, and then let go. Your formula is replicated all the way down, with cell references automatically adjusted.
4. If you really want the 'T'-added values in the original column, copy column B, then right-click on the column A header and choose "Paste Special...", choose "Values", and click OK. Then delete column B. Warning: if column A uses formulas to display its data, this will destroy those underlying formulas, leaving only the values!

I found IsNumeric(B) to be true for blank cells, so I changed your If statement accordingly.  This worked for me:

    If IsNumeric(B) And B <> "" Then
        Cells(B.Row, 9) = Cells(B.Row + 1, 8) & Cells(B.Row + 2, 8)
        Cells(B.Row + 1, 8) = ""
        Cells(B.Row + 2, 8) = ""
    End If
    If B.Row > 9 Then Exit For

Obviously 8 and 9 are the column numbers for H and I, respectively.  I added the

If B.Row > 9 Then Exit For

line because I had a problem with the loop not terminating; if

For Each B In ClientTable.Columns(2).Cells

works for you, you can take out the If B.Row > 9 Then Exit For.