Hi,

As the title says it, I am currently stuck with a specific part of a project ( I am still new at programming and VBA).

My final goal is to count how many words are contained in each cell of a column.
To do that, and for 1 cell, my method is to count how many spaces there are, and to say that there is 1 more word.
To count these spaces, I want to use a loop which finds the first space, then the next one by starting at the location of the previous one +1

The procedure attached woks until there is no space left to find. Then I get an error message.
Any help to straighten up this coding would be very much appreciated.

Thank you for reading.

The attached file contains a procedure which purpose is to count the words in C4
IsError_WordsPerCell-2ndMethod.xlsm