Excel如何插入gif图片

Excel是不支持gif格式的图片的，但Excel可以支持Flash文件，因此只要将Gif格式文件转为Flash文件，就可以实现在Excel中播放Gif格式的动画了。如果要将Gif格式文件转换成Flash文件还需要下载一个GIF2SWF专用软件。现在举例说明将Gif格式动画插入Excel的文件方法。

步骤1安装GIF2SWF后，双击该软件的图标按钮，打开GIF2SWF软件

步骤2单击“添加文件”按钮，添加需要转换的文件。这里也可以一次性添加多个Gif文件，进行批量转换。

步骤3单击“转换”按钮，完成Gif文件到Flash的Swf文件的转换

我也是网上找的，你试试看吧，希望对你有帮助

附, 插入SWF文件到EXCEL SHEET的代码,插入完成后,需要根据SWIFF生成的SWF文件大小再调整一下尺寸.

Sub InsertSWF()

Dim Fp

Dim Swf As String

Fp = Application.GetOpenFilename("Flash文件,*.swf", , "选择FLASH文件", , False)

If Fp = False Then Exit Sub

ActiveSheet.OLEObjects.Add(ClassType:="ShockwaveFlash.ShockwaveFlash.9", _

Link:=False, DisplayAsIcon:=False, Left:=20, Top:=20, Width:= _

450, Height:=300).Select

Swf = Selection.Name

ActiveSheet.OLEObjects(Swf).Object.EmbedMovie = True

ActiveSheet.OLEObjects(Swf).Object.Menu = False

ActiveSheet.OLEObjects(Swf).Object.Movie = Fp

Range("D8").Select

Application.CommandBars("Exit Design Mode").Visible = True

Application.CommandBars("Exit Design Mode").Controls(1).Execute

End Sub

（首先要将gif格式的图片转成swf格式的文件，也就是flash动画图片文件<我用的转换软件是gif2swf>）

如果是Flash动画文件，就这样插入——

1、新建一Word文档并保存。

2、在Word中依次单击下拉菜单“视图”→“工具栏”→“控件工具箱”。

3、在“控件工具箱”中点击“其他控件”，选择列表中的“Shockwave Flash Object”。

4、右键单击插入进来的Flash播放控件，选择“属性”。

5、在“属性”窗口的“Movie”栏输入Flash动画的路径及文件名，需要用绝对路径，

6、将“EmbedMovie”项设置为“True”，使Flash嵌入到Word中。“Height”和“Width”分别为Flash的高和宽。“Scale”默认为ShowAll，为缩放模式，始终显示Flash中的所有内容，如果改为NoScale则始终按1：1比例，不会缩放Flash中的内容。

7、单击控件工具箱上的“退出设计模式”按钮，在Word中即可播放Flash了。再次按下该按钮则暂停播放，进入设计模式。如当时未显示Flash，请保存退出Word，再打开该Word文档，点击“退出设计模式”按钮即可看到Flash。

（在 excel用同样方法：只是在excel选择了Shockwave Flash Object后，鼠标会变为“+”光标，然后在excel画出一块与要插入的gif图片大小相当或稍大的区域，用以放置图片。请一定要选好位置，因为插入图片后，有些图片是防编辑的，不能移动和调整大小。）

---