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


3 participantes

    [Resolvido]Bloquear grupo de opções

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Bloquear grupo de opções Empty [Resolvido]Bloquear grupo de opções

    Mensagem  OLDRIVG 24/10/2018, 18:32

    Prezados, boa tarde.

    Qual o procedimento para bloquear um grupo de opções?

    Estou usando o código abaixo, mas não funciona.
    If Not IsNull(Me.Arquivar1) = True Then
    Me.Arquivar1.Locked = True
    Else
    Me.Arquivar1.Locked = False
    End If


    Voltando a esclarecer que "Arquivar1" é um Campo Grupo de Opções.

    A propósito, gostaria de saber a diferença entre as expressões de códigos Me.txtCampo1.visible=true e txtCampo1.visible=true. Há alguma alteração em usar ou não o Me?

    Desde já agradeço.
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  Sidney 24/10/2018, 18:51

    Boa Tarde!!

    tente assim,

    Código:
    If Not IsNull(Me.Arquivar1) = True Then
    Me.Arquivar1.enabled = True
    Else
    Me.Arquivar1.enabled = False
    End If

    att: Sidney
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  OLDRIVG 24/10/2018, 18:58

    Boa tarde, Sidney, obrigado pela a atenção.

    Infelizmente não funcionou.
    Penso que os dois códigos Enabled/Locked diferem-se somente no fato de um ativar/desativar e o outro bloquear/desbloquear.

    De qualquer forma, lhe agradeço.
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  Sidney 24/10/2018, 19:39

    OLDRIVG

    manda o banco de dados para podermos verificar

    att; Sidney
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  vieirasoft 24/10/2018, 19:45

    Teste assim:

    If Me.Arquivar1.Value = 0 Then
    Me.Arquivar1.enabled = True
    End If
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  OLDRIVG 25/10/2018, 10:58

    Grande Vierasoft, bom dia.

    A sua sugestão funciona, porém ela trava todos os registros. Ou seja, não desativa/bloqueia apenas aquele registro que se está fazendo . Ao realizar o próximo registro, o campo Grupo de Opções "Arquivar1" fica inacessível.

    Testei nos seguintes eventos:

    No atual e após atualizar, do formulário;
    Ao sair e Após atualizar, do campo Grupo de Opções "Arquivar1"

    Existe alguma forma de contornar este entrave?

    A propósito, gostaria de saber a diferença entre as expressões de códigos Me.txtCampo1.visible=true e txtCampo1.visible=true. Há alguma alteração em usar ou não o Me?

    Agradeço
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  vieirasoft 25/10/2018, 13:05

    Eis um exemplo. Espero que corresponda ao que pretenda, senão só vendo.


    https://www.dropbox.com/s/pocqqxd9g01bcdn/grupoop%C3%A7%C3%A3o.mdb?dl=0
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  OLDRIVG 25/10/2018, 14:53

    Prezado Vieirasoft, obrigado.

    Vi o seu exemplo. Não é bem isto que pretendo.

    No seu exemplo, o Grupo de Opções é ativado ao digitar no campo Teste e quando é salvo/reaberto o formulário 1, o registro ele volta desativado.

    Testei a sua sugestão mas não funcionou comigo.

    Eu preciso que quando for selecionado uma opção no campo Grupo de Opções "Arquivar1" e ao sair do campo o mesmo fique bloqueado, mas bloqueado somente no registro que estiver sendo feito. Quando for iniciado novo registro o campo Grupo de Opções "Arquivar1" esteja desbloqueado até for selecionado uma opção.

    Estou enviando o cópia do prototipo do BD para que você dê uma olhada, por favor. Observe que implementei sua sugestão no campo DestinoMovimentacao1" e desativou geral o Grupo de Opções "Arquivar1".


    Desde já agradeço
    Anexos
    [Resolvido]Bloquear grupo de opções AttachmentPROTOCOLO - Prototipo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (444 Kb) Baixado 5 vez(es)
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  vieirasoft 25/10/2018, 19:18

    Boa tarde. baixe novamente e teste


    https://www.dropbox.com/s/6cm465643atyx4n/grupoop%C3%A7%C3%A3o.mdb?dl=0
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  OLDRIVG 26/10/2018, 14:22

    Grande Vieirasoft, bom dia!

    Funcionou legal.

    Só não entendi o porque de referenciar somente uma opção no código do evento ao Abrir do formulário, sendo que tem 3 opções.

    No evento Ao Abrir do formulário:

    If Me.NewRecord Then
    Me.Opção6.Locked = False
    Else
    Me.Opção6.Locked = True
    End If

    Mas funcionou.

    Aproveitando o ensejo, seria possível me esclarecer a diferença entre as expressões de códigos Me.txtCampo1.visible=true e txtCampo1.visible=true. Há alguma alteração em usar ou não o Me?

    Mais uma vez, agradeço-lhe e também ao Sidney.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  vieirasoft 26/10/2018, 14:41

    Desculpe, fui eu que não limpei o código, por isso lhe apareceu essa anomalia. Limpe que não tem serventia.
    Ao referir-se aos objectos com Me. está a clarificar mais rápido e melhor o código. Em linguagem corrente: a dar nome aos bois.

    Abraço e bom trabalho
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  vieirasoft 26/10/2018, 14:43

    faltou o resolvido

    Conteúdo patrocinado


    [Resolvido]Bloquear grupo de opções Empty Re: [Resolvido]Bloquear grupo de opções

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 13:00