VBA 图表的基本操作（三）

最新推荐文章于 2023-07-17 12:27:15 发布

YeXueQing2020

最新推荐文章于 2023-07-17 12:27:15 发布

阅读量4.2k

点赞数 4

分类专栏： EXCEL VBA

本文链接：https://blog.youkuaiyun.com/di77haowenming/article/details/108014893

版权

本文介绍了如何使用VBA进行Excel图表的操作，包括删除图表：删除单个图表、批量删除图表；创建大量图表：针对40天每天24小时数值变化创建折线图；以及导出图表：导出为gif格式和HTML网页格式，并针对导出gif的问题寻求解答。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

今天继续讲讲VBA图表的相关内容

一、删除图表

①假设sheet1上面有个图表，要删除的话，代码如下：

Sub demo()
    Sheets("Sheet1").ChartObjects(1).Delete
End Sub

②如果是单独的一张Chart，要删除的话直接把Chart删除就可以啦：

Sub demo()
    Sheets("Chart1").Delete
End Sub

这样删除会弹出一个警告框，如果不需要弹出警告框可以加一句：

Sub demo()
    Application.DisplayAlerts = False
    Sheets("Chart1").Delete
    Application.DisplayAlerts = True
End Sub

③如果需要删除在Sheet1上所有图表的话，可以通过shapes进行遍历：

Sub demo()
    Dim shp As Shape
    For Each shp In Sheets("Sheet1").Shapes
        shp.Delete
    Next
End Sub

.也可以通过图表对象ChartObject进行操作：

Sub demo()
    Dim chartObj