使用 VBA 在 Excel 中插入图片

Question

Леонид

Asked:2024-10-06 23:34:48 +0800 CST2024-10-06 23:34:48 +0800 CST 2024-10-06 23:34:48 +0800 CST

再次使用复选框宏

我已经联系过这个宏（复选框宏）并收到了全面的答复：

For i = 1 To 6
  If Controls("CheckBox" & i) = False Then  
    MsgBox "TEST", vbOKOnly
  End If
Next

但我的 Excel 暂时不想运行它，VBA 编辑器报告“控件未定义”，请帮我解决这个问题。继续搜索我的问题，我发现在同一个英语网站https://stackoverflow.com/a/57983985/27667238 上有一个答案，于 2019 年给出，但我的英语水平不允许我立即找到答案。

rotabor · Answer 1 · 2024-10-06T23:56:01+08:00

Best Answer

rotabor

工作表中的对象可通过 Shapes 集合访问：

ActiveSeet.Shapes("CheckBox" & i).DrawingObject

ActiveSeet.Shapes("CheckBox" & i).DrawingObject.Object

您可以通过复选框的外观、行为或 Shape.Type 值来确定其类型： ActiveSeet.Shapes("CheckBox" & i).Type