Excel VBA - Combine rows with duplicate values in one cell and merge values in other cell

Question

I am trying to find duplicate values in one column and combine the values of a second column into one row. I also want to sum the values in a third column.

For examp

Answer 1

.Cells(lngRow, 11) = .Cells(lngRow, 8) & "; " & .Cells(lngRow + 1, 8)

should be

.Cells(lngRow, 11) = .Cells(lngRow, 8) & "; " & .Cells(lngRow + 1, 11)