首页 > 解决方案 > VBA:如何将图形声明为对象

问题描述

在名为 的工作表sheet1中,有一个名为 的图形graph1。该图是使用名称框命名的。我想将它声明为一个对象,以便以后可以复制和粘贴它。我有以下代码:

Sub dumb()

Dim tot_cap As Object

Set tot_cap = ThisWorkbook.Sheets("sheet1").Object("graph1")

End Sub

上面的代码导致以下错误消息:

run time error 438: object doesn't support this property or method

如何在 VBA 中正确声明命名图形对象?

标签: excelvba

解决方案


嵌入式图表是ChartObject.

Dim tot_cap As ChartObject
Set tot_cap = ThisWorkbook.Sheets("sheet1").ChartObjects("graph1")

推荐阅读