文章目录 1、方法一2、方法二 1、方法一 复制图表>选择性粘贴在word或ppt中>选择图片右键,另存为图片 2、方法二 Alt+F11,Ctrl+G打开编辑框 粘贴如下代码(其中,“图表 1”是图表名称,点击后可在左上角看到名称) ActiveSheet.ChartObjects("图表 1").Chart.Export ThisWorkbook.Path &"\" & "图片.jpg",FilterName:="jpg" 移动到代码末尾回车(切记,移动到代码末尾,移动到代码末尾,移动到代码末尾) 会在和XXX.excel同目录下生成一张图片