返回列表 上一主題 發帖

暫停Worksheet_SelectionChange

暫停Worksheet_SelectionChange

若果工作表中使用了
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
如何可以當執行另一個巨集時可暫時停止該巨集的運作

及如何讓程式知道現時是那個巨集執行中

請指教

回復 1# enoch
Private Sub Worksheet_SelectionChange 這是工作表SelectionChange事件
其他巨集中可用 Application.EnableEvents 暫時停止觸發和還原
  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  2.   MsgBox Target.Address
  3. End Sub

  4. Sub myTest()
  5.   Application.EnableEvents = False  '暫停Excel事件
  6.   Range("E5").Select  '不會跳出訊息
  7.   Application.EnableEvents = True   '還原Excel事件
  8.   
  9.   Range("E6").Select  '會跳出訊息
  10. End Sub
複製代碼

TOP

        靜思自在 : 【生命在呼吸間】佛陀說:「生命在呼吸間。」人無法管住自己的生命,更無法擋住死期,讓自己永住人間。既然生命去來這麼無常,我們更應該好好地愛惜它、利用它、充實它,讓這無常、寶貴的生命,散發它真善美的光輝,映照出生命真正的價值。
返回列表 上一主題