在Excel中播放gif图片

6、图片中的注册表分别为：HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\ClickToRun\RE镟搞赃呓GISTRY\MACHINE\Software\Microsoft\Office\16.0\Common\COMCompatibility\{8856F961-340A-11D0-A96B-00C04FD705A2}HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\ActiveX Compatibility\{8856F961-340A-11D0-A96B-00C04FD705A2}HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Internet Explorer\ActiveX Compatibility\{8856F961-340A-11D0-A96B-00C04FD705A2}快捷搜索：{8856F961-340A-11D0-A96B-00C04FD705A2}

9、直接复制如下代码：Sub 运行()Acti箪滹埘麽veSheet.WebBrowser1.Navigate ThisWorkbook.Path & "\实验" & "\GIF.gif"End SubSub 停止()ActiveSheet.WebBrowser1.Navigate ThisWorkbook.Path & "\实验" & "\0.jpg"End Sub