VBA에서 Excel의 여러 확인란을 삭제하는 방법은 무엇입니까?

Question

VBA를 사용하여 여러 개의 checkoxes를 삭제하려고합니다.

Sub DeleteCheckbox() 
    Dim cb As CheckBox 

    For Each cb In Sheets("Job_Card_Update").CheckBoxes 
     If cb.TopLeftCell.Address = Sheets("Job_Card_Update").Range("M13:M20").Address Then cb.Delete 
    Next 
End Sub 

Answer 1

사용 Application.Intersect Method (Excel)을 시험을 여러 범위가 서로와 공유 세포를 교차하는 경우 다음과 같이 같은

내가 지금까지 가지고있는 코드입니다.

Dim cb As CheckBox 
With Sheets("Job_Card_Update") 
    For Each cb In .CheckBoxes 
     If Not Intersect(cb.TopLeftCell, .Range("M13:M20")) Is Nothing Then cb.Delete 
    Next 
End With