SENDKEYS change the "Number Lock" status

  • Thread starter Thread starter Kenneth Lam
  • Start date Start date
K

Kenneth Lam

Hi,

I am using sendkeys to enter data into Peachtree. I found that after
Excel changed to Peachtree and start entering, the number lock
"sometimes" will on and off for several times.

I have tried to write a "plain" macro with "sendkeys" only and test on
other software and found it is the same. The status will also change.
The pattern is not fixed. That is under the same problem and same
string being sent, sometimes will flash 2 times and sometimes may
flash 5 times.

Any suggestions?

Thanks.
 
Option Explicit
Declare Function SetKeyboardState Lib "User32" (kbArray As Byte) As Long
Sub toggleit()
Dim KeyState(0 To 255) As Byte
KeyState(&H90) = 1 'for on 0 for off
SetKeyboardState KeyState(0)
End Sub

Worked ok for me in win98.
 
Back
Top