MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    Supervisão do click em botões-VBA

    Compartilhe

    amarcial
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 08/07/2015

    Supervisão do click em botões-VBA

    Mensagem  amarcial em Seg 27 Jul 2015, 12:51

    Gostaria de supervisionar o click de um determinado botão(Comando0) em um determinado formulário(teste1) sem usar o onclick das propriedades do referido botão.

    Tentei:

    if teste1!Controls!Comando0.onclick = true then .... e não funciona

    Como devo fazer?

    Obrigado

    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3236
    Registrado : 20/04/2011

    Re: Supervisão do click em botões-VBA

    Mensagem  Silvio em Seg 27 Jul 2015, 13:32

    Bom dia...seja bem vindo ao fórum...

    Não entendi o que quer dizer com o " supervisionar " !
    Sempre haverá um evento " ao clicar ( on click) " em qualquer botão, afinal botões foram para serem clicados e são ativados por procedimentos de eventos.
    Se puder ser mais claro, agradecemos !


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    Diegokul
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 26/07/2015

    Re: Supervisão do click em botões-VBA

    Mensagem  Diegokul em Seg 27 Jul 2015, 13:48

    Podes criar uma Tag dentro do evento click

    EX:

    Private Sub CommandButton1_Click()
    Tag = "EDITAR"

    End Sub


    If Tag = "EDITAR" Then

    'executa ação
    Tag = "" 'zera a tag para nova conferencia do click
    Else

    End If


    Podes criar uma variável também para contar quantos clicks foram dados.


    Dim x As Integer

    Private Sub CommandButton1_Click()
    x = x + 1

    End Sub

    Private Sub exenplo()

    If x >= 1 Then

    'executa ação
    Else

    End If

    End Sub

    amarcial
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 08/07/2015

    Supervisão do click em botões-VBA

    Mensagem  amarcial em Qua 29 Jul 2015, 14:02

    Caros

    Acho que não fui claro. Não gostaria de usar o evento click das propriedades do botão.

    Gostaria de saber como seria o código em VBA para usar um botão em um formulário sem ser no evento click.

    Att

    Alcibiades

    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3236
    Registrado : 20/04/2011

    Re: Supervisão do click em botões-VBA

    Mensagem  Silvio em Qua 29 Jul 2015, 14:13

    Bom dia....

    Amarcial....para que então colocar um botão de comando em um formulário.......se não vai usar ele ?

    Estou até agora sem entender o que deseja...o que pretende...e o que quer afinal !

    Em sua primeira mensagem, no exemplo do código, já deu para ver um click na linha....

    Ou.......você deseja saber quantos cliques aquele determinado botão recebeu ?


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    amarcial
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 08/07/2015

    Supervisão do click em botões-VBA

    Mensagem  amarcial em Qua 29 Jul 2015, 19:37

    Caro

    Muito obrigado pela atenção.

    Na verdade quero saber como utilizar um botão ou qualquer outro comando de formulário utilizando VBA, ou seja, como se as SUB's, ao clicar, ao focar, etc., não existissem.

    Obrigado

    Alcibiades

      Data/hora atual: Qui 08 Dez 2016, 00:09