QQ网名大全

如何把excel里的折线图另存为图片

  推荐如下几种方法:

  方法一:

  1、  复制图表>选择性粘贴在本文档中>选择图片

  2、  关闭文档

  3、  更改文档扩展名为rar

  4、  打开rar文件(左键点击)>xl>media,找到图片


  方法二:

  1、  复制图表>选择性粘贴在word或ppt中>选择图片

  2、  右键,另存为图片


  方法三:

  使用宏导出图片。“图表 1”是图表名称,点击后可在左上角看到名称。

  1、  Alt+F11,打开编辑框

  2、  粘贴如下代码

  3、  F5运行

Sub Test()
Dim my_Sheet As Worksheet
Dim my_Chart As ChartObject
Set my_Sheet = Worksheets(1)
Set my_Chart = my_Sheet.ChartObjects("图表 1")
my_Chart.Chart.Export ThisWorkbook.Path & "\"& "图片.jpg", FilterName:="jpg"
End Sub

   

  也可直接在快速运行栏,输入如下代码。

  1、  Alt+F11,Ctrl+G打开编辑框

  2、  粘贴如下代码

  3、  回车

  

ActiveSheet.ChartObjects("图表 1").Chart.Export ThisWorkbook.Path &"\" & "图片.jpg",FilterName:="jpg"
佚名
2024-05-20 14:51:06
最佳回答
类似问题(10)