Excel 2010 VBA-从图表表导出图表
我正在努力找到正确的语法,以便从图表表中导出图表,而不是嵌入到工作表中。我曾经将图表嵌入其中,但在用户的要求下将其转移到自己的表格中,我似乎找不到任何适合的。这是嵌入图表的代码,有人能给我一个语法提示吗Excel 2010 VBA-从图表表导出图表,vba,excel,charts,Vba,Excel,Charts,我正在努力找到正确的语法,以便从图表表中导出图表,而不是嵌入到工作表中。我曾经将图表嵌入其中,但在用户的要求下将其转移到自己的表格中,我似乎找不到任何适合的。这是嵌入图表的代码,有人能给我一个语法提示吗 Public Sub ExportChart() Dim varChartObject As ChartObject Dim varChart As Chart Dim varFilename As String Dim varPath As String
Public Sub ExportChart()
Dim varChartObject As ChartObject
Dim varChart As Chart
Dim varFilename As String
Dim varPath As String
Set varChartObject = Sheets("Output Chart").ChartObjects(1)
Set varChart = varChartObject.Chart
varFilename = Format(ThisWorkbook.Sheets("Parameters").Range("C5").Value, "YYYYMMDD")
varPath = "MyPath\" & Format(ThisWorkbook.Sheets("Parameters").Range("C5").Value, "MM. MMMM")
On Error Resume Next
Kill varPath & "\" & varFilename
On Error GoTo 0
varChart.Export Filename:=varPath & "\" & varFilename & ".png", Filtername:="PNG"
Set varChartObject = Nothing
Set varChart = Nothing
End Sub
提前感谢您只需在开始时使用:
Set varChart = Charts("chart sheet name")
您只需要在开始时使用此选项:
Set varChart = Charts("chart sheet name")
难以置信。我已经找了好几天了,尝试了所有不同的语法。谢谢你的帮助,难以置信。我已经找了好几天了,尝试了所有不同的语法。谢谢你的帮助。