excel vba while循环中检测按键事件？

各位大虾大家好，我想在excel中实现空格键抽签开始，再按空格键停止抽签。
具体为
当第一次按空格键
while keycode =13 
     cells(1,1)=100*rnd() 
wend
第二次按空间键跳出循环
cells(1,1)中为选中的数

这个循环中keycode 为按键的代码如“回车”“空格“等
可是怎么在循环中捕捉键盘操作。我用的是vba --------------------编程问答-------------------- 我自己解决了，中间放DOEVENTS --------------------编程问答-------------------- 纠结啊

补充：VB ,  VBA