如何从任何特定单元格中仅删除1个复选框？

Question

如何使用Excel VBA从任何特定单元格（例如“C38”）中仅删除1个复选框？

Answer 1

以下是 如何删除特定形状的小指南

如您所见，选择一个形状会在 Name box（位于公式框左侧）中显示其名称。在上面的示例中，所选形状的名称为 Rectangle 1
如果你想删除一个特定的形状，你必须知道它的名字（好吧，如果它是一个特定的形状，它有自己的属性不同于任何其他形状，但我不会在这里讨论） <登记/> 获取要删除的形状名称的最简单方法是单击形状并在 Name box 中查找名称。
知道名称后，您可以修改当前代码并添加if statement以获得Shapes集合中某个项目的匹配。

Sub DeleteShape()
    Dim vShape
    For Each vShape In ActiveSheet.Shapes
        If StrComp(CStr(vShape), CStr("Rectangle 1"), 1) = 0 Then
            vShape.Delete
            Exit For
        End If
    Next
End Sub