我正在处理Excel文件,我需要一个宏,它只截取当前工作表的单元格G3到J14的屏幕截图,并将其保存为包含Excel文件的文件夹的图像文件(任何常见格式都可以)文件名与单元格B3的内容相匹配。
答案 0 :(得分:0)
这似乎有效:
Sub Macro1()
myFileName = "chrt.png"
Range("G3:J14").Select
Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
Charts.Add
ActiveChart.Paste
ActiveChart.Export Filename:=ThisWorkbook.Path & "\" & myFileName, Filtername:="PNG"
End Sub
但您可能需要调整大小或编辑生成的图片以满足您的需求。完成后,您可能还想删除图表。