如何将Excel中的图表复制到图片中

如何将Excel中的图表复制到图片中？Excel  VBA可以用来将工作表中的图表复制到一张图片中，并且使用对象对象的复制图片方法来实现这个操作。介绍了将Excel中的图表复制成图片的具体操作方法。

1.启动Excel，打开包含图表的工作表，打开Visual  Basic编辑器，在项目资源管理器中添加一个模块，并在该模块的代码窗口中输入程序代码，如图1所示。具体程序代码如下：

子复制图表()

如果活动图表什么也不是，那么’请先选择一个图表！’

出口接头

结束条件

活动图表。复制图片外观：=xlScreen，格式：=xlBitmap

范围(“N8”)。挑选

动态页面。粘贴

末端接头

提示

在VBA，CopyPicture方法可以将所选图表作为图片复制到剪贴板，该方法的语法结构如下：

表达式复制图片(外观、格式)

这里，表达式是一个变量，表示一个科目对象。此方法的外观参数是一个可选参数，用于设置图片的复制模式，其默认值为xlScreen。该参数可以设置为以下两个常量之一。

XlPrinter:图片是根据其打印效果复制的。

XlScreen:根据屏幕显示尽可能多地复制图片。

格式参数用于设置复制图片的格式，默认值为xlPicture。该参数可以设置为以下两个常量之一。

XlBitmap:位图(。bmp。jpg，gif)。

XlPicture:绘制图片。png。wmf。混合)。

2.按F5运行程序。如果工作表中的图表没有被选中，程序会提示用户首先选择图表，如图2所示。如果工作表中的图表已被选中，则复制选中的图表，如图3所示。

图2提示您选择一个图表

图3中选择的图表被复制为图片