title: MS Word automation: can't enable red underlines for spelling check
body: <p>My code needs to enable spelling check in MS Word 2010 so user can see red underlines under misspellings.</p>
  
  <p>In current version I try to do this to enable spelling check:</p>
  
  <pre><code>wordApplication.Options.CheckSpellingAsYouType = true;
  wordApplication.Options.SuggestSpellingCorrections = true;
  wordApplication.ActiveDocument.ShowSpellingErrors = true;
  wordApplication.ActiveDocument.CheckSpelling();
  </code></pre>
  
  <p>I open Word and type in "Test texxt string". After this I run my code but nothing happens:
  <img src="https://i.stack.imgur.com/D0m0K.png" alt="No underlines under texxt word"></p>
  
  <p>I don't see any underlines under "texxt". If I go to options I see that "check spelling as you type" option was enabled:
  <img src="https://i.stack.imgur.com/nBoFb.png" alt="enter image description here"></p>
  
  <p>Now if I check this property:</p>
  
  <pre><code>wordApplication.ActiveDocument.SpellingErrors[0].Text
  </code></pre>
  
  <p>It will contain "texxt" which means that spelling was actually checked.</p>
  
  <p>Also if I simply restart MS Word and type in same text - red underlines become visible:
  <img src="https://i.stack.imgur.com/d525m.png" alt="enter image description here"></p>
  
  <p>I also tried to call Application.ScreenRefresh and set ScreenUpdating properties but this haven't given any effect.</p>
  
  <p><strong>Note:</strong> I run this code/macro in the beginning, when there is no text in a document. If some text is there - it works.</p>
  
  <p><strong>Note2:</strong> Exact steps to reproduce:</p>
  
  <ol>
  <li><p>Start MS Word. Go to options and disable "check spelling as you type". Restart Word.</p></li>
  <li><p>Start Word and run following macro:</p>
  
  <pre><code>Options.CheckSpellingAsYouType = true
  Options.SuggestSpellingCorrections = true
  ActiveDocument.ShowSpellingErrors = true
  </code></pre></li>
  <li><p>Type in following text: "Test texxt string.". Press Enter.</p></li>
  <li><p>Run following macro</p>
  
  <p>MsgBox ActiveDocument.SpellingErrors(1).Text</p></li>
  </ol>
  
  <p>You will see "texxt" in MessageBox but not red underlines</p>