Gif анимация на форме vba

Формулировка задачи:

Здравствуйте! Покажите пожалуйста пример вставки gif анимации на форму vba. Не могу найти работающего примера именно на vba в формах word или excel. anigif.ocx скачал, зарегистрировал, а вот что дальше делать, не найду (

Решение задачи: «Gif анимация на форме vba»

textual
                            Листинг программы 
                        

                            Option Explicit
Function mygif() As String
    mygif = ThisWorkbook.Path & "\mygif.gif"
End Function
Sub Button2_Click()
    UserForm1.Show
 
Option Explicit
Private Sub UserForm_Initialize()
    Me.WebBrowser1.Navigate2 mygif
End Sub
                        