摘要: 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 阅读(1290) 评论(0) 推荐(0) 编辑
点击右上角即可分享
微信分享提示