• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

jnabais

Desactivar teclas com VBA no Excel

3 mensagens neste tópico

Boa noite

Gostaria de saber se é possível bloquear (desactivar) as teclas (comando) Alt+Shift+F11 que corresponde ao Microsoft Script Editor com programação VBA no excel.

Grato pela ajuda.

Cumprimentos ao forum.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olá,

Podes fazer em duas fazer (para ficar mais completo)

1º Desabilitas a tecla atribuindo outra função, que será em branco para não fazer nada

Application.OnKey "+%{F11}", ""

2º Desabilitas o menu para o utilizador não ir pelos menus

Dim menubar As CommandBar
Dim menuitem As CommandBarPopup

Set menubar = CommandBars("Tools")
Set menuitem = menubar.Controls(14)
menuitem.Controls(5).Enabled = False

Podes colocar no arranque do excel e voltar a habilitar quando fechares o ficheiro de modo a não interferir com os outros workbooks. Já agora para restaurar as teclas fazer:

Application.OnKey "+%{F11}"

Nota: Testado para Excel 2003

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olá

Mais uma vez obrigadão...

Cumprimentos

PS Assunto encerrado.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora