[Resolvido]Inserir caractere unicode via VBA

Olá,

Já fiz várias pesquisas e testes, mas eu não estou conseguindo avançar, então peço a ajuda de vocês.

Preciso de uma solução para que quando eu pressionar uma determinada tecla (por exemplo F11) seja inserido em qualquer campo que eu estiver (incluindo um subformulário) um caractere especial, no caso § (U+00A7). Pelo que eu pesquisei esse é o código unicode.

Alguém tem alguma sugestão de como resolver isso?


Obrigado!

No evento "ao apertar tecla"

Código:

If KeyCode = vbKeyF11 Then
    Screen.ActiveControl.Value = Screen.ActiveControl.Text & Chr(167)
    KeyCode = 0
End If

Prezado DamacenoJr.

Primeiramente quero pedir desculpa pela demora em dar um retorno.
Agradeço muito pela sua orientação.
A minha maior dificuldade estava em fazer o código para do "Ao apertar tecla"

Acabei mudando o código, pois ao pressionar a tecla F11 é inserido o caractere desejado, mas em seguida o campo todo fica selecionado.

Então adicionei um outro código que se não estou enganado foi você que ensinou em outra postagem.

Ficou assim:

If KeyCode = vbKeyF11 Then
Dim objws As Object
Set objws = CreateObject("wscript.shell")
objws.SendKeys Chr(167)
Set objws = Nothing
End If


Muito obrigado!

Eu havia esquecido de marcar como Resolvido