VBA Code show GIF animation on UserForm by My Langdy

 កូដសម្រាប់ដាក់រូបភាពGIFឱ្យដំណើរបង្ហាញលើUserForm of Excel VBA។

       

    Private Sub Start_Random_Click()
    	Me.WebBrowser1.Visible = True
    	Call GIFanimation("D:\Project Management\Create GIF animation\randomgif.gif", 300, 250)
	End Sub
    
    
	Sub GIFanimation(ruta As String, ancho As Integer, alto As Integer)
    	Me.WebBrowser1.Visible = True
    	Me.WebBrowser1.Navigate2 "about:" & _
    	"" _
       & ""& _""
	End Sub