Vba 访问在工作表上绘制的标签

我直接在excel工作表上绘制了一个简单的标签控件。但我似乎找不到任何方法通过VBA编辑器中的代码访问它。这可能吗？

您可能已经绘制了ActiveX标签或表单标签。如果它是工作表上的第一个标签，则以下代码将选择默认的“label1”名称，并且objActiveXLabel或objFormslabel将引用您的控件

您还可以在插入标签时尝试使用VBA记录器录制宏，因为这将为您提供指向标签类型的指针以及如何操作标签

Dim objActiveXLabel As OLEObject
Dim objFormsLabel As Shape
On Error Resume Next
Set objActiveXLabel = ActiveSheet.OLEObjects("Label1")
Set objFormsLabel = ActiveSheet.Shapes("Label 1")
On Error GoTo 0
If Not objActiveXLabel Is Nothing Then MsgBox "Found an ActiveX label", vbExclamation
If Not objFormsLabel Is Nothing Then MsgBox "Found an Forms label", vbExclamation

---

+1-我接受了你关于实验录音机的建议。有点棘手。但它成功了。谢谢你的接受。请注意，我更新了测试的尺寸，以便“更多”正确无误测试