559 attributed reviews in the last 3 years
Refreshingly small course sizes
Outstandingly good courseware
Whizzy online classrooms
Wise Owls only (no freelancers)
Almost no cancellations
We have genuine integrity
We invoice after training
Review 30+ years of Wise Owl
View our top 100 clients
This exercise is provided to allow potential course delegates to choose the correct Wise Owl Microsoft training course, and may not be reproduced in whole or in part in any format without the prior written consent of Wise Owl.
You should find that this document already contains a macro:
'the entire story
Dim EntireStory As Range
'a collection of words
Dim StoryWords As Words
'the range of text in each word
Dim EachWordRange As Range
'get references to entire story,
'and collection of words in it
Set EntireStory = _
Set StoryWords = EntireStory.Words
'for each word in story ...
For Each EachWordRange In StoryWords
'... list it to debug window
This macro prints out the text of each word.
Amend your macro so that it loops over all the words in this story, either:
adding the word to an Excel spreadsheet if not already found; or
increasing the word count in Excel if this word has already been added.
Your final output should start like this:
After sorting, you should find The is the most common word.
Save this document with the same name, then close it down.
25 Aytoun Street