怎样将Excel中图表复制为图片

  使用Excel VBA可以将工作表中的图表复制为图片,实现这种操作使用的是ChartObjects对象的CopyPicture方法。本文介绍将Excel中图表复制为图片的具体操作方法。

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

  Sub CopyChart()

  If ActiveChart Is Nothing Then

  MsgBox “请先选择一个图表!”

  Exit Sub

  End If

  ActiveChart.CopyPicture appearance:=xlScreen,Format:=xlBitmap

  Range(“N8”).Select

  ActiveSheet.Paste

  End Sub

怎样将Excel中图表复制为图片

  图1 插入模块并输入程序代码

  提示

  在VBA中,CopyPicture方法能够将选中的图表作为图片复制到剪贴板中,该方法的语法结构如下所示:

  表达式CopyPicture(Appearance,Format)

  这里,表达式是一个代表ChartObject对象的变量。该方法的Appearance参数是一个可选参数,用于设置图片的复制方式,其默认值为xlScreen。该参数可以设置为下面的两个常量之一。

  xlPrinter:图片按其打印效果进行复制。

  xlScreen:图片尽可能按其屏幕显示进行复制。

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

  xlBitmap:位图(.bmp、.jpg、.gif)。

  xlPicture:绘制图片(.png、.wmf、.mix)。

  2、按F5键运行程序,如果没有选择工作表中的图表,则程序给出提示,提示用户先选择图表,如图2所示;如果已经选择了工作表中的图表,则选择图表被复制,如图3所示。

怎样将Excel中图表复制为图片

  图2 提示选择图表

怎样将Excel中图表复制为图片

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

感谢您访问:生涯设计公益网!本文永久链接:https://www.16175.com/650829.html。侵删或不良信息举报请联系邮箱:121488412@qq.com或微信:aban618。
(0)

相关推荐

  • win11小娜怎么打开 win11小娜怎么唤醒

    win11系统内置cortana小娜这个功能,这个AI人工智能可以为用户带去诸多便捷体验。那么win11小娜怎么打开呢?方法很简单,大家可以打开搜索框功能,在其中搜索cortana…

    2022年7月26日
    231
  • WORD不能工作怎么解决

    在Windows 7系统中打开办公软件Microsoft Office Word出现错误提示“Microsoft Office Word已停止工作”,对于此问题,请按照以下的步骤操…

    2022年9月13日
    86
  • windows7不是正版怎么解决 windows7不是正版怎么解决方法介绍

    windows7不是正版怎么解决呢,众所周知,大部分国内的win7实际上都不是正版的win7,而是复制版的,因此这些是没有通过微软验证的系统,所以到了一段时间之后就会出现提示不是正…

    2022年7月27日
    183
  • win10打印测试页在哪里 win10打印测试页位置介绍

    win10打印测试页在哪里是装好了打印机的用户们想要知道的内容,通过打印测试页可以帮助用户确定当前的打印机设备是否是正常和电脑连接的,其实用户只需要进入系统设置的设备里面点击打印机…

    2022年7月26日
    219
  • excel表格如何把纵向变横向

      excel纵向变横向步骤如下:   01在第一个数据格里输入1,下面依次按顺序输入。   02在框选的整列数字上方点击鼠标右键,复制数据。   03首个格子里点击鼠标左键,则这…

    2022年8月27日
    213
  • win11此站点的连接不安全怎么办

    在win11电脑中我们可以通过浏览器浏览不同的站点,有时候会收到此站点的连接不安全的提示,这时候我们就打开当下使用的浏览器设置选项,找到隐私、搜索和服务内的安全性设置,关闭掉下方的…

    2022年7月27日
    894
分享本页
返回顶部