Excel vba - 마우스 이벤트 사용 안 함

Question

수동 수식 계산 모드에서 Excel 2010 통합 문서를 개발하고 있습니다.

파일 -> 옵션 -> 수식 -> 통합 문서 계산 ->

매뉴얼은 그러나, 나는 몇 가지 메뉴 선택 통합 문서의 재 계산을 유발합니다.

그래서 나는 다음과 같은 코드를 사용하고 있습니다 :

Private Sub Worksheet_Change(ByVal Target As Range) 

    On Error Resume Next 

    Application.EnableEvents = False 

    If SOME_CONDITION 

     Application.Calculate 
     ActiveSheet.AutoFilter.ApplyFilter 

    End If 

    Application.EnableEvents = True 

End Sub 

문제는 내가 마우스 가운데 버튼을 스크롤하거나,이 기능이 실행되는 동안 셀을 클릭 해요 경우 계산이 갑자기 종료 것입니다 완료되기 전에 받아 들여지지 않습니다.

줄이 Application.EnableEvents=False 인 경우 마우스 이벤트가 시작되는 것을 방지하지 못하고이 버그를 방지 할 수있는 대안을 찾지 못했습니다.

그래서 내가 필요한 것은 계산 중에 모든 이벤트를 차단하는 방법이거나 해고 된 이벤트가 계산을 방해하지 못하게하는 것입니다 (통합 수식 계산이 수동이 아닌 경우).

대단히 감사합니다.

감사합니다.

마탄.

Answer 1

이 시도 :

Application.Interactive = False 

하는 매크로가 실행되는 동안. 완료되면 다시 true로 설정하십시오.