VBA Macro to create Word & Phrase Frequency

CarolynV said:

However, is there a way to limit it from running into the next cell in the column when counting occurences of phrases?

Click to expand...

Sub add_end_of_line()
'this will add a dot at the end of every cell value.
Dim va
Dim i As Long
va = Range("A1", Cells(Rows.Count, "A").End(xlUp))
For i = 1 To UBound(va, 1)
    va(i, 1) = va(i, 1) & "."
Next
Range("A1").Resize(UBound(va, 1), 1) = va
End Sub

Akuini said:

@CarolynV
Using your example, here's the result:

dhee - Macro to create Word & Phrase Frequency 1.xlsm
	A	B	C	D	E	F	G
1	faulty replacement required.		3 WORD	COUNT		4 WORD	COUNT
2	replacement item ordered.		faulty replacement required	1		item sent to customer	1
3	Loan item sent to customer.		item sent to	1		Loan item sent to	1
4			Loan item sent	1
5			replacement item ordered	1
6			sent to customer	1
Sheet1

Click to expand...

CarolynV said:

Absolutely amazing. Thank you so much.

Click to expand...