I'm trying cut all the words of a string except the first one and paste the resulting "new" string in the cell where the old one was. This is the code I came up with so far:
Sub CECorrect()
Dim i As Integer
Dim s As String
Dim indexOfString As Integer
Dim finalString As String
For i = 4 To...