title: Insert animated gif on a worksheet
body: <p>I have an animated gif file.</p>
  
  <p>How can I get this animation to appear on Sheet1 and then close when my macro is complete?</p>
  
  <p>I tried adding the gif as a picture then adding a webbrowser command window and command button.</p>
  
  <p>I wrote the following command button code.</p>
  
  <pre><code>Private Sub CommandButton1_Click()
      WebBrowser1.Navigate1 ("C:\Users\smorfett\Desktop\progress.gif")
  End Sub
  </code></pre>
  
  <p>I get</p>
  
  <blockquote>
    <p>'Object doesn't support this property or method'</p>
  </blockquote>