Como Usar As Constantes Keycode No Excel

[Duduh_Capixaba]

Olá pessoal, estou estreando por aqui.

Tenho um Form contendo dois botões e o seguinte código:

Private Sub UserForm_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

Select Case KeyCode

Case vbKeyNumpad1

MsgBox "Você teclou o número 1"

End Select

End Sub

O código serve pra quando eu apertar a tecla 1 do teclado numérico aparecer a mensagem "Você teclou o número 1". O problema é que esse código só funciona se o Form estiver vazio, pois quando os botões estão dentro dele automaticamente um deles é focado. Como faço para o código funcionar mesmo com os botões dentro do Form?

[Duduh_Capixaba]

Só pra ajudar: no Access estava acontecendo a mesma coisa, mas aí, pesquisando aqui no forum descobri que nas propriedades do Form existe uma configuração na categoria "Evento" chamada "KeyPreview (ou Visualizar teclas)" que se marcada como "True (Sim)" faz o teclado funcionar independente de o formulário ter ou não algum objeto inserido.

O problema é que não encontrei essa propriedade no Excel :( alguém sabe qual configuração eu devo modificar no Form?

Editado Setembro 12, 2007 por Duduh_Capixaba

[Duduh_Capixaba]

Resolvido pessoal! Quer dizer, mais ou menos...o jeito que eu encontrei é mais uma "gambiarra" do que uma solução definitiva. O que eu fiz:

Como o código vbKey só funciona se você estiver com o objeto focado nele (isso só no Excel, no Access existe a configuração que eu escrevi acima), criei um botão que sempre recebe o foco após alguma ação, e escrevi todo o código vbKey neste botão. Ou seja, com esse botão sempre em foco, qualquer tecla que se encaixe no código irá funcionar.

Aí é só esconder esse botão atrás de algum outro objeto pra que ele não fique sobrando dentro do Form. Foi o único jeito que encontrei, pois não encontrei uma configuração pro Form.

Bem, é isso! Espero que ajude a outras pessoas tb :)