VBA Excel - fechar programas externos

Meus caros,

criei para o meu trabalho um painel de pesquisa de satisfação, onde utilizo um monitor touch para as pessoas clicarem nos 4 botões.

Acontece que, eu trabalho em uma escola, onde os alunos são mais espertos do que a gente imagina, e como não havia bloqueio, eles fechavam e até alterava.

Então, o painel foi criado em VBA no excel, onde um Form cobre toda a tela, e tem um Menu com opções. para acessar o Menu eu inseri uma senha, então, ninguém consegue fechar e nem fazer nada a não ser votar nos 4 botões.

Como o monitor é touch, eu consigo abrir o teclado virtual através do Shellexecute, então não deixo teclado nem mouse disponível, porém, gostaria de uma ajuda para inserir um código VBA para fechar o teclado após o OK da senha.

O código que utilizo para abri o teclado virtual é esse

Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _

(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _

ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Sub sbx_abrir_teclado_virtual()

ShellExecute 0, "open", "osk.exe", "", "", 1

End Sub

abre numa boa, mas não consegui desenvolver um código para fechar o teclado.

se alguém souber como fazer,  agradeço a ajuda