title: word vba: webbrowser not navigating for ReadyState to check
body: <p>I am trying to extract links from webpages, but it seems webbrowser does not navigate, so I get infinite loop at webbrowser1.readstate &lt;> readystate_complete...</p>
  
  <p>HOWEVER, if make a breakpoint at webbrowser1.readstate &lt;> readystate_complete, the webbrowser navigates successfully in the userform, and code works.... </p>
  
  <p>Any ideas? Thanks</p>
  
  <pre><code>Do Until n = num
  
      WebBrowser1.Navigate URL
  
      Do While WebBrowser1.readyState &lt;&gt; READYSTATE_COMPLETE
  
      Loop
  
  
      If WebBrowser1.readyState = READYSTATE_COMPLETE Then
          'code
      end if
  
      n = n +1
  
  loop
  </code></pre>