Como executar a função da tecla esc em vba

Question

Eu preciso executar a função da tecla esc através do VBa como se ela tivesse sido pressionada.

Já consegui ativar e desativar a tecla, mas não executar a sua função pelo VBA

Obrigado

---

Rui Martins

Answer 1

Tente assim Rui:

SendKeys "{ESC}"

---

Natan

Answer 2

Olá!
No evento"KeyDown" você pode ver isto:

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown

        If e.KeyCode = Keys.Escape Then 'define "ESC"

            MsgBox(" 'Esc' acionada! " _

& "Troque esta mensagem por outra ação!")

        End If

    End Sub

Então, amigo, é só substituir o "Mgbox" pela tarefa que você deseja que seja executada.

Aqui esta:

---

MS INFORMATICA - Projeto Marinner

Answer 3

obrigado. resolveu

---

Rui Martins

Answer 4

valeu

---

Rui Martins

Answer 5

Rui,

caso sua intenção seja executar uma dada ação em um formulário (fechar o formulário, por exemplo), o mais simples e correto é associar a propriedade 'Cancel' no evento 'Initialize':

SeuBotão.Cancel = True

Assim, sempre que pressionar a tecla 'Esc', em qualquer parte do formulário, a ação associada a este botão será executada.

O mesmo vale para 'Enter', bastando configurar a 'Default':

SeuBotão.Default = True

Abraço.

---

Filipe Magno

Answer 6

obrigado.

---

Rui Martins