在對A賦值的同時會再次觸發Worksheet_Change事件

把主要程序寫到 sub op()
(然後call sub 方式執行主要程序
目地是保正Target.Row是固定的 你要的)
開頭補上布林變數 now_exe=1
主要程序結束後
用Select 歸位 Target cell
布林變數 now_exe=0

在Worksheet_Change 裡做個可否執行 call sub 的判別
If(now_exe =0) then call op(target)

在開起excel 事件中設定
布林變數Now_go =0