나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내
작성자:  

 조삿갓 (choga21)

추천:  2
파일:     Declare오류.png (23.2KB) 조회:  2154
제목:   VBA 코드로 키보드의 NumLock 키를 제어할 수 있나요?
     
  - 엑셀 버전: 2016, 64비트

* 아래줄에 질문을 작성하세요 >>

구글링해서 아래 코드를 알아냈지만
32비트 버전에서는 되는데
64비트 버전에서는 첨부 파일과 같은 오류가 뜹니다.

무엇을 어떻게 업데이트를 해야 하나요?

-------------------

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer

Const KEYEVENTF_KEYUP = &H2
 
Private Sub UserForm_Activate()
    If GetKeyState(vbKeyNumlock) = 0 Then
        keybd_event vbKeyNumlock, 0, 0, 0
        keybd_event vbKeyNumlock, 0, KEYEVENTF_KEYUP, 0
    End If
End Sub
 
[불량 게시물 신고]  
        
  

작성일 : 2019-08-05(11:04)
최종수정일 : 2019-08-05(11:04)
 


 ◎ 관련글

  제 목   작성자   날짜
VBA 코드로 키보드의 NumLock 키를 제어할 수 있나요? 조삿갓 2019-08-05
[RE]VBA 코드로 키보드의 NumLock 키를 제어할 수 있나요? dew 2019-08-06