EXCEL VBA 3個按鈕的判斷動作
http://forum.twbts.com/attachments/month_1401/14010910420a22dfd3677f4f5d.jpg.thumb.jpg一.按下啟動鈕
(1)會檢測C5儲存格是否為 1 或 -1
為1執行巨集1
為-1執行巨集3
(2)再次檢測C5儲存格是否為 0
為0執行巨集2
會一直循環上述動作(除非按下停止鈕或緊急鈕 才會停止)
二.按下停止鈕
(1)如果C5儲存格為1 或 -1，會等到C5儲存格為 0 才停止(也就是會執行完巨集2)
(2)如果C5儲存格為0，直接停止(不會執行巨集2)
三.按下緊急鈕
(1)如果C5儲存格為 1 或-1 ，馬上會執行巨集2，立即停止
(2)如果C5儲存格為0，直接停止(不會執行巨集2)(與停止鈕第2條敘述一樣)
======================================
C5儲存格 版大可手動輸入1或 0 或 -1
會在A6-C6儲存格顯示數字(也就是我要的狀態或燈號)
請問各位大大
VB碼要如何寫
讓3個按鈕 有上述的動作
Ps.
我要的是 C5的訊號為(1 或-1 或 0)不管存在多久時間
都只會跑1次 直到訊號改變(例如 1->0 或0->-1或 -1>0 或 0->1 )
才會做 下一個動作
======================================
Sub Macro1()
'' Macro1 Macro
Range("A6").Select
ActiveCell.FormulaR1C1 = "1"
Range("B6").Select
Selection.ClearContents
End Sub
Sub Macro2()
' Macro2 Macro
Range("B6").Select
ActiveCell.FormulaR1C1 = "0"
Range("A6").Select
Selection.ClearContents
Range("C6").Select
Selection.ClearContents
End Sub
Sub Macro3()
' Macro3 Macro
Range("C6").Select
ActiveCell.FormulaR1C1 = "-1"
Range("B6").Select
Selection.ClearContents
End Sub
建議您到下列論壇尋求解答可能會較快喔~~
http://forum.twbts.com/index.php if......then..... 的運用! 或是採用select case 去運用!
只要去研究一下運用方法 就可以寫出來了!
頁:
[1]