MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


5 participantes

    [Resolvido]chamar via tecla

    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]chamar  via tecla Empty [Resolvido]chamar via tecla

    Mensagem  Agravina 18/7/2010, 23:11


    tenho form chamado f_vendas e gostaria de chamar frm troco via tecla f10 por ex
    como ficaria codigo
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  criquio 18/7/2010, 23:16

    No form f_vendas, na lista de eventos, defina Visualizar teclas = Sim e no evento "Ao apertar tecla" coloque:

    If KeyCode = 121 Then
    DoCmd.OpenForm "frm troco"
    End If


    121 é o código da tecla F10.

    Dica: procure sempre colocar os nomes de seus controles sem espaços, pois o Access não gosta muito de nomes com espaços e pode dar problemas.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]chamar  via tecla Empty chamar via tecla

    Mensagem  Agravina 19/7/2010, 03:11

    amigo criquio tentei o codigo mas nao deu certo eu uso este codigo abaixo o botao camndo, mas eu queria usar a tecla f10 como eu faço
    Private Sub Comando9_Click()
    On Error GoTo Err_Comando9_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "frmTotal"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

    Exit_Comando9_Click:
    Exit Sub

    Err_Comando9_Click:
    MsgBox err.Description
    Resume Exit_Comando9_Click

    End Sub
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  Assis 19/7/2010, 10:53

    Agravina
    Tem que por Nas propriedades do formulário PRÉ-VISUALIZAR CHAVE como SIM, como disse o Criquio

    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  criquio 19/7/2010, 13:32

    ^
    |
    |


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  Agravina 19/7/2010, 18:53


    Amigos do Forum perdoes minha ignorancia mas nao consigo fazer fazer que estando no form1 ao clicar f10 chama form2

    nas propriedades do form 2 e form1 esta ativa visualizar teclas mas o cod nao funciona que esta errado
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  JPaulo 19/7/2010, 19:26

    No evento VBA ao apertar tecla do Form1

    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 121 Then
    DoCmd.OpenForm "Form2"
    Else
    KeyCode = 0
    End If
    End Sub



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]chamar  via tecla Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]chamar  via tecla Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]chamar  via tecla Folder_announce_new Instruções SQL como utilizar...
    Gilberto Rocha
    Gilberto Rocha
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1027
    Registrado : 21/01/2010

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  Gilberto Rocha 20/7/2010, 15:55

    Aproveitando o embalo, tem como colocar isso em uma função public para todos os forms?
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  criquio 4/1/2011, 20:25

    Top, embora meio tardio, vai uma dica para fazer o que pretendes: crie um módulo, crie a função com o nome que desejar e coloque o código que quiser nessa função. Depois, no evento "Ao apertar tecla" dos formulários, é só chamar a função.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    Gilberto Rocha
    Gilberto Rocha
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1027
    Registrado : 21/01/2010

    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  Gilberto Rocha 4/1/2011, 22:33

    Antes tarde do que nunca, valeus Criquio!!!
    cheers

    Conteúdo patrocinado


    [Resolvido]chamar  via tecla Empty Re: [Resolvido]chamar via tecla

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 14:06