Does anyone know a way to control where the table of unique words and their frequencies appear? I have a worksheet with multiple 10-15+ columns of qualitative info I'd love to be able to summarize any column using these codes (CreateUniqueWords as well as Chandoo's tag cloud generation code).
I believe it would be best if it would be possible to output the table of unique words to another worksheet then create the tagcloud based off of the table and place it on this sheet. Basically I just want to keep my analysis separate from the worksheet with the original data.
I'll be honest I had a little trouble following the following portion of the CreateUniqueWords macro. Thanks a bunch in advance!
For Each rngCell In rngData.Cells
For Each vntWord In Split(Replace(Replace(Replace(rngCell.Value, """", ""), "]", ""), "[", ""), " ")
colWords.Add colWords.Count + 1, vntWord
With Cells(29 + colWords(vntWord), 3)
.Value = vntWord
.Offset(0, 1) = .Offset(0, 1) + 1
End With
Next
Next
With Range("C30", Cells(Rows.Count, 3).End(xlUp)).Resize(, 2)
.Sort .Cells(1, 2), xlDescending
End With
Bookmarks