Macro run manually

[lealeadupont]

I have this macro to run manually with a list of phrases and I need to write what it does

Sub exam()
Dim MyInput As a String
Dim Total As Integer
For j=1 to 30
Total=0
MyInput=Celles(j,1)
For i=1 To Len(MyInput)
If Mid(MyInput,i,1)=""Then
Total=Total+1
End If
Next i
Cells (j,2)=Total+1
Next j
End sub


List in excel file :

This eBook is for the use of anyone anywhere at no cost and with​

almost no restrictions whatsoever. You may copy it, give it away or​

re-use it under the terms of the Project Gutenberg License included​

with this eBook or online at www.gutenberg.org​

Title: Alice’s Adventures in Wonderland​

Author: Lewis Carroll​

Posting Date: June 25, 2008​

Release Date: March, 1994​

Last Updated: October 6, 2016​

Language: English​

ALICE’S ADVENTURES IN WONDERLAND​

Lewis Carroll​

THE MILLENNIUM FULCRUM EDITION 3.0​

CHAPTER. Down the Rabbit Hole​

Alice was beginning to get very tired of sitting by her sister on the​

bank, and of having nothing to do: once or twice she had peeped into the​

book her sister was reading, but it had no pictures or conversations in​

it, ‘and what is the use of a book,’ thought Alice ‘without pictures or​

conversations?’​

So she was considering in her own mind (as well as she could, for the​

hot day made her feel very sleepy and stupid), whether the pleasure​

of making a daisy chain would be worth the trouble of getting up and​

picking the daisies, when suddenly a White Rabbit with pink eyes ran​

close by her.​

There was nothing so VERY remarkable in that; nor did Alice think it so​

VERY much out of the way to hear the Rabbit say to itself, ‘Oh dear!​

Oh dear! I shall be late!’ (when she thought it over afterwards, it​

occurred to her that she ought to have wondered at this, but at the time​

it all seemed quite natural); but when the Rabbit actually TOOK A WATCH​

OUT OF ITS WAISTCOAT POCKET.​

 

[ranman256]

not sure what your question is.