MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Habilitar botão em formulário contínuo.

    Compartilhe
    Rosalvo Petrillo
    Rosalvo Petrillo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 21/09/2013

    [Resolvido]Habilitar botão em formulário contínuo.

    Mensagem  Rosalvo Petrillo em 10/2/2019, 00:49

    Boa noite a todos!!!

    Em um formulário contínuo com dados somente de uma tabela, tenho um botão de comando no cabeçalho que deverá estar habilitado somente se um dos registros estiver com a caixa de seleção marcada. (Verdadeiro)

    Todos as caixas de seleção desmarcadas (falso) - botão  bloqueado/ se ao menos uma caixa tiver marcada, botão desbloqueado.

    Alguém pode me ajudar? Muito obrigado!!!
    avatar
    FabioGO
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 105
    Registrado : 22/08/2012

    Re: [Resolvido]Habilitar botão em formulário contínuo.

    Mensagem  FabioGO em 11/2/2019, 10:34

    Veja se é isso
    Anexos
    Exemplo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (23 Kb) Baixado 6 vez(es)
    Rosalvo Petrillo
    Rosalvo Petrillo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 21/09/2013

    habilitar botão em formulário contínuo.

    Mensagem  Rosalvo Petrillo em 11/2/2019, 16:42

    Obrigado Fabio pela dica.

    Vou ter que fazer algumas adaptações porque não posso usar "Requery" nesse campo. Ele faz parte do critério da consulta, que exige "false" para o mesmo. Vou criar um outro campo na tabela e ver se consigo fazer funcionar. Mais a noite eu dou um retorno. Mais uma vez obrigado!
    Rosalvo Petrillo
    Rosalvo Petrillo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 21/09/2013

    habilitar botão em formulário contínuo.

    Mensagem  Rosalvo Petrillo em 11/2/2019, 20:16

    O amigo IvanJr me ajudou com um código que impede que o formulário contínuo se feche caso alguma caixa de seleção existente nos registros esteja selecionada.


    Aqui o código:

    Private Sub Form_Unload(Cancel As Integer)

    Dim objRS As Recordset
    Dim booTemMarcado As Boolean

    Set objRS = Me!subForm.Form.RecordsetClone

    If objRS.RecordCount > 0 Then

    Call objRS.MoveFirst

    Do

    booTemMarcado = objRS!ativo.Value
    Call objRS.MoveNext

    Loop Until objRS.EOF Or booTemMarcado

    End If

    Call objRS.Close: Set objRS = Nothing

    Cancel = booTemMarcado

    End Sub

    Agora o que eu preciso é que o "Botão" que coloquei no cabeçalho do form. esteja habilitado somente quando alguma das caixas de seleção esteja marcada. No exemplo que o amigo Fabio me passou funciona perfeitamente, só que no meu caso não poderei usar Requery como já disse, e aí o código deixa de funcionar.
    Tentei adaptar o código acima, mas infelizmente não consegui.


    avatar
    FabioGO
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 105
    Registrado : 22/08/2012

    Re: [Resolvido]Habilitar botão em formulário contínuo.

    Mensagem  FabioGO em 12/2/2019, 10:23

    Melhor postar seu programa para verificar como está e como adaptar.
    Rosalvo Petrillo
    Rosalvo Petrillo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 21/09/2013

    habilitar botão em formulário contínuo.

    Mensagem  Rosalvo Petrillo em 12/2/2019, 22:49

    avatar
    FabioGO
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 105
    Registrado : 22/08/2012

    Re: [Resolvido]Habilitar botão em formulário contínuo.

    Mensagem  FabioGO em 13/2/2019, 10:40

    Rosalvo

    Esse modelo que você disponibilizou está parecido com o exemplo que te passei.

    Eu teria que ver o código que você diz que interrompe com o requery

    Tente usar no lugar do requery o refresh para ver se tem o mesmo efeito
    Rosalvo Petrillo
    Rosalvo Petrillo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 21/09/2013

    habilitar botão em formulário contínuo.

    Mensagem  Rosalvo Petrillo em 13/2/2019, 13:06

    Ok Fábio!!!!
    Com Refresh o problema foi resolvido. Muito obrigado mesmo por sua atenção. Grande Abraço!

      Data/hora atual: 18/2/2019, 02:44