vba chart判断怎么写

[复制链接]
查看11 | 回复3 | 2013-1-31 16:50:40 | 显示全部楼层 |阅读模式
哦 这个容易如果你不是指定某一个特定的chart 而是有chart就MsgBox "图表已存在!"你可以这么写dim i%i=activesheet.chartobjects.countif i0 then MsgBox "图表已存在!"...
回复

使用道具 举报

千问 | 2013-1-31 16:50:40 | 显示全部楼层
前面给你这个是判断指定图表是否存在的,想判断是不是有图表稍微修改就好啦 。。。o(︶︿︶)o 唉
For Each c In ChartObjects
MsgBox "图表已存在!"
Next...
回复

使用道具 举报

千问 | 2013-1-31 16:50:40 | 显示全部楼层
Sub test()
Dim sha As Shape, i As Integer
For Each sha In Sheets(1).Shapes
MsgBox sha.Name & "已存在"
i = i + 1
Next
If i = 0...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行