摘要:
Sub ExportChart() Dim myChart As Chart Dim myFileName As String Set myChart = Sheet1.ChartObjects(1).Chart myFileName = "myChart.jpg" On Error Resume Next Kill ThisWorkbook.Path & "\" & myFile... 阅读全文
posted @ 2010-07-17 13:02
RobinLao
阅读(1304)
评论(0)
推荐(0)