SendKeys y Num Lock

Hola de nuevo KL y quien quiera darme una mano:

Mi codígo:

Private Sub Workbook_Activate()
Application.OnKey "{Enter}", "Tabular"
End Sub

Private Sub Workbook_Deactivate()
Application.OnKey "{Enter}"
End Sub

'Y en un modulo normal...
Private Sub Tabular()
SendKeys "{Tab}"
End Sub

Mi problema: Cuando se procesa el SendKeys, sobre todo en una celda
en la que el ingreso desata mucho cálculo y en una máquina lenta, se
produce un parpadeo del Num Lock en el teclado. Esto, si el usuario es
muy rápido cargando, provoca que el siguiente número que ingrese (en
la celda a donde lo envía el SendKeys) la máquina lo reciba con Num
Lock desactivado y por ej. en vez de tomar "3", tome PgDown y el
usuario (que normalemente mira poco y nada la pantalla) termina
cargando datos 20 filas abajo.
Se me ocurre que esto es un problema del Sistema Operativo (por
cierto W98) y no se si tenga solución, pero si alguién sabe o le
paso...bueno en fin...Gracias a todos.