Worksheet_Change 欄位變更則執行程式

by zhi hao

多個欄位時指定欄位有變更時則執行程式

VBA程式碼

Private Sub Worksheet_Change(ByVal Target As Range) Select Case Target.Column Case 3 MsgBox ("OK") Case 6 MsgBox ("OK") Case 9 MsgBox ("OK") End Select End Sub

相關文章

發表回應

本網站放置cookies,務求為您提供最佳的網上瀏覽體驗。 接受 閱讀更多