怎么将Excel中的图表复制到图片中

如何将Excel中的图表复制到图片中?ExcelVBA可以用来将工作表中的图表复制到一张图片中,并且使用对象对象的复制图片方法来实现这个操作 。介绍了将Excel中的图表复制成图片的具体操作方法 。
1.启动Excel,打开包含图表的工作表,打开VisualBasic编辑器,在项目资源管理器中添加一个模块,并在该模块的代码窗口中输入程序代码,如图1所示 。具体程序代码如下:
子复制图表()
如果活动图表什么也不是,那么’请先选择一个图表!’
出口接头
结束条件
活动图表 。复制图片外观:=xlScreen,格式:=xlBitmap
范围(“N8”) 。挑选
动态页面 。粘贴
末端接头
提示
在VBA,CopyPicture方法可以将所选图表作为图片复制到剪贴板,该方法的语法结构如下:
表达式复制图片(外观、格式)
这里,表达式是一个变量,表示一个科目对象 。此方法的外观参数是一个可选参数,用于设置图片的复制模式,其默认值为xlScreen 。该参数可以设置为以下两个常量之一 。
XlPrinter:图片是根据其打印效果复制的 。
XlScreen:根据屏幕显示尽可能多地复制图片 。
格式参数用于设置复制图片的格式,默认值为xlPicture 。该参数可以设置为以下两个常量之一 。
XlBitmap:位图( 。bmp 。jpg,gif) 。
XlPicture:绘制图片 。png 。wmf 。混合) 。
2.按F5运行程序 。如果工作表中的图表没有被选中,程序会提示用户首先选择图表,如图2所示 。如果工作表中的图表已被选中,则复制选中的图表,如图3所示 。

怎么将Excel中的图表复制到图片中

文章插图
图2提示您选择一个图表
怎么将Excel中的图表复制到图片中

文章插图
【怎么将Excel中的图表复制到图片中】图3中选择的图表被复制为图片

    推荐阅读