Hi - Im trying to remove stop words from a column containing 16,000 rows of sentences. The n00b code I have is not working. Any ideas on how I could do this?
Attached is the list of stop words. COlumn 'D' in my excel sheet had the stop words.
Sub Macro1()
'
' Macro1 Macro
'
'
Last = Cells(Rows.Count, "D").End(xlUp).Row
For i = Last To 1 Step -1
ActiveSheet.Range("A2:A17000").Select
Selection.Replace What:=Cells(i, "D").Value, Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next i
End Sub
Bookmarks