返回列表 上一主題 發帖

[發問] 關於Workbook_Open會不當觸發Num Lock使其關閉?

[發問] 關於Workbook_Open會不當觸發Num Lock使其關閉?

  1. Private Sub Workbook_Open()
  2.     On Error Resume Next
  3.     Application.SendKeys ("%{F11}") '按下 Alt+F11 鍵
  4.    
  5.     With Application
  6.         With .VBE.MainWindow
  7.             .WindowState = vbext_ws_Minimize
  8.             .Visible = False
  9.         End With
  10.     End With
  11. End Sub
複製代碼
以上自動執行後會讓Num Lock的燈關閉?
如何讓他不關閉Num Lock的燈,再次感謝。

回復 2# luhpro


    Application.SendKeys("{NUMLOCK}")
解決了我的問題,受益良多,回文晚了,真是抱歉!

TOP

        靜思自在 : 能善用時間的人,必能掌握自己努力的方向。
返回列表 上一主題