| 
    
     |  | ▼Tsuyo さん: こんにちは
 
 >試してみたのですが状況が変わりませんので、別の理由のようです。
 >もう少しコードを拡大して載せます。
 すみませんが、どういう条件の時、
 ※下記のコードが動いてしまっているようです。
 のコードを動かしたいのですか?
 又、どういう時にイベントを抑止したいのでしょう?
 
 今のコードだと
 Not Intersect(Target, Range("C7:C26")) Is Nothing =TRUE
 の時しかイベントの抑止は効かないようになってますが。
 但し、位置的には
 Application.EnableEvents = True
 は以下が正解かと思いますが。
 End With
 End If
 Application.EnableEvents = True
 End If
 
 恐らく、ある範囲のセルのデータを変更した時にだけ、イベントを抑止したい
 とは思うのですが、
 >※下記のコードが動いてしまっているようです。
 のコードの中にその処理をしてますか?
 
 それとデバッグ段階では完全にエラーを把握している時以外は、
 >On Error Resume Next 'エラーを無視する
 は使わない方が良いかと。
 
 
 |  |