我们有时需要在网页中插入一个图表，或者在其它非Office程序中用到图表，有没有一种办法可以将Excel工作簿中的图表插入到其它程序中呢？其实可以通过把工作表存为一个HTML文件的方式来实现，在另存为网页时，Excel会自动将图表转换为GIF文件。如果你觉得这样做麻烦的话，也可以利用Office自带的VBA编辑器来编写一个简单的宏来完成这个工作。

具体操作步骤如下：

1.创建练习用的图表

启动Excel,默认的工作簿为Book1,首先我们在工作表Sheet1中输入如图1所示的数据。这儿要注意，数据的起伏不要太大，以免创建的图表有失协调。

选中A1到E5单元格，然后执行菜单命令“插入>图表”，打开“图表向导”对话框，在对话框中直接单击“完成”按钮，则会创建出如图2所示的图表。

2.创建宏

按快捷键Alt+F11键，打开Visual Basic编辑器。在“工程”窗口中选中图表所在的工作簿，然后执行菜单命令“插入>模块”，打开“模块1”窗口，在窗口中输入以下四行代码，如图3所示。

Sub SaveChartAsGIF ()

Fname = ThisWorkbook.Path & "\" & ActiveChart.Name & ".gif"

ActiveChart.Export FileName:=Fname, FilterName:="GIF"

End Sub

代码输入完成后，不要忘记存盘。存盘后关闭Visual Basic编辑器。

3.执行宏

[1] [2]  下一页