Excel VBA Turn On Num Lock

Stupid question, but isn't there a simpler way to turn on/off num lock key then this site: http://www.freevbcode.com/ShowCode.asp?ID=1144

It just seems like it is overly complicated

You might be able to sendkeys numlock somehow, but what you have is the correct way to do it. Awhile back I tried looking for ways to turn it off and all I got was the same way you have.

Actually SendKeys seems to be the cause of my trouble... it seems some combination of my SendKeys is causing Num Lock to be turned off! Which is fouling up the users after the code runs they have to turn num lock back on

http://support.microsoft.com/default.aspx?kbid=179987
BUG: Multiple SendKeys Statement Turns Off NumLock Key

You could possibly simplify the code you referenced if you don't need to support Win 9x, but that is the method most of us use to set the state of CapsLock, NumLock, etc. - it really isn't all that cumbersome.