Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


7 / 13327 ツリー ←次へ | 前へ→

【80993】エクセル2016ですがクラッシュします goushi 19/7/4(木) 18:05 質問[未読]

【80997】Re:エクセル2016ですがクラッシュします goushi 19/7/5(金) 17:19 質問[未読]
【80998】Re:エクセル2016ですがクラッシュします γ 19/7/5(金) 18:15 回答[未読]
【80999】Re:エクセル2016ですがクラッシュします goushi 19/7/5(金) 18:56 お礼[未読]

【80997】Re:エクセル2016ですがクラッシュします
質問  goushi  - 19/7/5(金) 17:19 -

引用なし
パスワード
   新しいブックで確認したところ以下のコードが原因のようでした
イベントプロシージャの部分の
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Call 小計
End Sub

それを以下のように変更すると
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Call 小計
End Sub

クラッシュしなくなりました
エクセル2013だと問題なく動くようなのですが
よろしければお教えいただけないでしょうか

【80998】Re:エクセル2016ですがクラッシュします
回答  γ  - 19/7/5(金) 18:15 -

引用なし
パスワード
   小計 の処理のなかでセル内容を変更すると
それがchangeイベントを発生させ・・
と繰り返しが起きるからじゃないですか?
回避するには
Application.EnableEvents=False
セル変更
Application.EnableEvents=True
とするとよいでしょう。
ネットで検索してみてください。

【80999】Re:エクセル2016ですがクラッシュします
お礼  goushi  - 19/7/5(金) 18:56 -

引用なし
パスワード
   早速のご回答ありがとうございます
再度調整してみます

7 / 13327 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free