如何從任何特定的單元格中只刪除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