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

santos1948

[VBA] Atalhos de Teclado no Access

1 mensagem neste tópico

Um formulário onde se registam clientes, Form_Clientes, cujo primeiro campo é NomeDaEmpresa o qual tem um botão que deve ser clicado para obter um novo registo: CmdNovoRegisto.

Abra o formulário em questão em modo de estrutura e desenhe um botão de comando, com o nome CmdNovoRegisto e na programação insira o seguinte código:

Private Sub CmdNovoRegisto_Click()
DoCmd.GoToRecord , , acNewRec
NomeDaEmpresa.SetFocus
End Sub

Criação da Função Novo

Insira um novo Módulo e digite o seguinte código:

Function Novo()
Form_Clientes.SetFocus
Form_Clientes.NomeDaEmpresa.SetFocus
DoCmd.GoToRecord , , acNewRec
Form_Clientes.NomeDaEmpresa.SetFocus
End Function

Feche a janela e grave o módulo com o nome NovoRegisto.

Criar a Macro

Criar uma nova macro, na barra de ferramentas em Ver, Nomes de Macro e digitar na coluna respectiva o nome da macro de acordo com os símbolos da pequena tabela:

[table][tr][td]Simbolo do Ctrl =  ^

Simbolo do Shift = +

Simbolo do n = n[/table]

e assim sucessivamente

Assim o nome da macro seria o equivalente a Ctrl+n ou seja ^n, na acção escolhemos executar código, e no Nome da Função escolhemos a função há pouco criada (Novo).

Fechar a janela gravando a macro com o nome AutoKeys.

Nota: Cuidado ao escolher as teclas de atalho porque existem algumas que estão pré-configuradas por defeito na aplicação.

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