Question

我还是VBA的新手，我无法将对象定义为形状。我有一个带矩形的excel工作表，我想从我的VBA用户表单中的comboBox更改此形状的颜色。我已经尝试了下面的代码和其他几种方法但是我一直遇到“shape”不是类型的错误，这使我无法使用诸如fill这样的成员。知道我正在使用VBA 2015可能会有所帮助，因为我知道年份之间存在一些差异

Dim rectangle as Shape
rectangle = sheet1.shapes("rectangle 1")
rectangle.Fill.Forecolor.RGB = RGB(255, 255, 255)

Answer 1

这有用吗？

With sheet1.shapes("rectangle 1")
    .Fill.Forecolor.RGB = RGB(255, 255, 255)
End With

Answer 2

运行此选项以列出Sheet1上的形状。你确定你有一个“矩形1”吗？

another-class

VBA 2015“形状”类型未定义

2 个答案: