問問蓮蓬頭

【說明】

某儲存格被異動時，則啟動你想要執行的程式，該如何撰寫程式碼呢?以下分享

 

【程序碼】

1.先點選你想要執行的工作表(紅框處)，然後物件名稱選取Workbook

 

 

2.事件名稱選取SheetChange

 

3.輸入以下程式碼

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

 

With Target

If .Row = 1 And .Column = 1 Then

    **輸入，若是觸發儲存格A1時，你所要執行的程式碼**

    Else

    **輸入，若不是觸發儲存格A1時，你所要執行的程式碼，若不執行則不需輸入**

End If

End With

 

End Sub

 

【程序碼解說】

Private Sub Worksheet_Change(ByVal Target As Range) 當工作表變更時,執行

 

With Target

If .Row = 1 And .Column = 1 Then '如果異動的是儲存格A1，.Row = 2 And .Column = 2，則是儲存格B2

    **輸入你所要執行的程式碼**

    Else

    **輸入若不是觸發儲存格A1時，你所要執行的程式碼，若不執行則不需輸入**

End If

End With

 

End Sub

 

謝謝您閱讀了我的文章，若您喜歡我的文章，希望您幫我按個「讚」，也幫忙分享給需要的朋友或其他平台，謝謝。