Excel에서 시트에서이 성가신 드롭 다운을 삭제할 수없는 이유는 무엇입니까?

Question

다음 코드를 사용하여 스프레드 시트에서 드롭 다운 삭제하려고합니다 :

Dim objShape As Shape 
For Each objShape In ActiveSheet.Shapes 
    objShape.Delete 
Next 

objShape objShape

  xlDropDown   xlDropDown
Debug.Print objShape.Name                     return "Drop Down 250"
Debug.Print objShape.TopLeftCell        는 Application-Defined or Object-Defined Error을 반환합니다.

ActiveSheet.Cells.Validation.Delete은이를 제거하지 않으며 ShapeRange도 사용하지 않습니다.

이 작은 놈을 근절하는 방법에 대한 제안은 크게 감사하겠습니다.

Answer 1

드롭 다운 목록이 통합 문서의 다른 시트에 연결되었습니다. 다른 시트를 삭제 한 후 코드가 모양을 올바르게 삭제했습니다.

Answer 2

커플 :

• 는 일부 시트 보호가 있습니까?
• 일부 유효성 검사의 드롭 다운 부분 (허용되는 값을 정의 할 수 있으며 일반적으로 드롭 다운 상자로 표시됨)입니다.