|
▼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 'エラーを無視する
は使わない方が良いかと。
|
|