[說明]
我們利用 TextBox_KeyDown 的事件進行觸發，來偵測使用者輸入的按鈕是否為 C 鍵(或特定按鍵)，若是則自動跳至下一個欄位，並輸入特定文字，這樣的程式該如何撰寫呢？以下進行分享

image

 
[程式碼]
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
   If KeyCode = 67 Then '當偵測到按下的按鈕是 C 鍵時，則觸發下述程式碼
      Application.SendKeys "{Tab}" '利用 SendKeys 送出 Tab 鍵，則會自動跳到下一個輸入欄位
      Application.SendKeys "{W}{O}{R}{D}" '利用 SendKeys 送出 W、O、R、D的按鍵
   End If
End Sub
 
[特別說明]
以下分享一些KeyCODE的代碼
A：65
B：66
C：67
以此類推到Z：90
CAPS LOCK：20
倒退鍵：8
Tab：９
 
謝謝您閱讀了我的文章，若您喜歡我的文章，希望您幫我按個「讚」，也幫忙分享給需要的朋友或其他平台，謝謝。
 
 
20180128 黑.png

arrow
arrow
    文章標籤
    EXCEL 偵測按鍵 偵測按鈕 特定按紐 自動輸入 VBA
    全站熱搜

    黑天使 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄