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]Referenciar egistro específico no subformulário

    avatar
    Convidad
    Convidado


    [Resolvido]Referenciar egistro específico no subformulário Empty Referenciar egistro específico no subformulário

    Mensagem  Convidad 30/8/2012, 14:11

    Bom dia amigos!
    Aqui estou eu com mais uma dúvida e gostaria de ajuda dos companheiros.

    É o seguinte: Tenho um subformulário contínuo.
    Preciso que nesse subformulário, um campo seja habilitado para edição apenas
    se atender a um determinado critério.

    Tentei isso:

    If MeuCritério = True Then
    Me.MeuCampo.Enabled = False
    Else
    Me.MeuCampo.Enabled = True
    End If

    O problema é que se o critério for falço, ele habilita todos
    os outros campos de todos os registros do subformulário, e não
    apenas o do registro atual.

    Como lidar com essa questão?
    Leandro
    Leandro
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1601
    Registrado : 12/11/2009

    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Leandro 30/8/2012, 14:44

    E se você colocar no evento Ao Sair do campo?

    Private Sub SeuCampo_Exit(Cancel As Integer)
    If Me.SeuCampo = X Then
    Docmd.CancelEvent
    End If
    End Sub

    Assim se o valor não atender ele não sairá do seu campo

    avatar
    Convidad
    Convidado


    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Convidad 30/8/2012, 15:04

    Grato Leandro, mas independente do evento, ao habilitar o campo,
    em todos os registros do formulário contínuo também é habilitado.
    Mas deveria habilitar apenas no registro referido.
    Leandro
    Leandro
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1601
    Registrado : 12/11/2009

    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Leandro 30/8/2012, 15:19

    Beleza, foi só uma sugestão. Cool

    Com base no que escreveu, seria assim:

    Private Sub SeuCampo_AfterUpdate()
    If Me.SeuCampo = X Then
    Me.ProximoCampo.Enable = False
    Else
    Me.ProximoCampo.Enable = True
    End If
    End Sub




    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  JPaulo 30/8/2012, 15:31

    Sugestão;

    Para formulario continuo utilize a formatação condicional.


    .................................................................................
    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]Referenciar egistro específico no subformulário Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Referenciar egistro específico no subformulário Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Referenciar egistro específico no subformulário Folder_announce_new Instruções SQL como utilizar...
    avatar
    Convidad
    Convidado


    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Convidad 30/8/2012, 15:37

    Grato JPaulo, mas como bloquear um campo de um registro específico do formulário continuo?
    avatar
    Convidad
    Convidado


    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Convidad 31/8/2012, 12:52

    Alguma sugestão? Smile
    avatar
    Convidad
    Convidado


    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Convidad 1/9/2012, 21:02

    UP! Smile
    Leandro
    Leandro
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1601
    Registrado : 12/11/2009

    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Leandro 3/9/2012, 02:16

    Boa noite, será que você pode postar uma parte do banco? E explicar mais sobre qual controle você quer que seja validado.

    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    [Resolvido]Referenciar egistro específico no subformulário Empty Referenciar egistro específico no subformulário

    Mensagem  toyebom 3/9/2012, 02:45

    desculpem a intromissão mas acho que ele quer qualquer coisa com o current record

    Private Sub Form_Current()
    If MeuCritério = True Then
    Me.MeuCampo.Enabled = False
    Else
    Me.MeuCampo.Enabled = True
    End If
    End Sub


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  JPaulo 3/9/2012, 09:24

    A propria Formatação Condicional bloqueia o registro especifico, basta você escolher Expressão e escrever lá o que quer.


    .................................................................................
    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]Referenciar egistro específico no subformulário Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Referenciar egistro específico no subformulário Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Referenciar egistro específico no subformulário Folder_announce_new Instruções SQL como utilizar...
    avatar
    Convidad
    Convidado


    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Convidad 3/9/2012, 13:04

    Toyebom, grato pela sujestão. Mas da forma que você propôs eu já tentei e ele bloqueia todos os campo...

    JPaulo, estou tentando essa regra, mas sem sucesso:

    SeImed([Nome].Valor=200;[Endereco].[Bloqueado]=Verdadeiro;[Endereco].[Bloqueado]=Falso)

    Caso o campo txtNome for igual a 200, o campo endereço deverá ficar bloqueado, mas não bleoqueia.
    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    [Resolvido]Referenciar egistro específico no subformulário Empty Referenciar registro específico no subformulário

    Mensagem  toyebom 3/9/2012, 14:30

    e assim?

    Private Sub Form_Current()
    If Me. txtNome
    = "200" Then
    Me.endereço
    .Enabled = False
    Else
    If Me. txtNome <> "200" Then
    Me.endereço.Enabled = True
    End If
    End If
    End Sub


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.
    avatar
    Convidad
    Convidado


    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Convidad 3/9/2012, 15:15

    toyebom, deu certo! Muito obrigado!
    Obrigado a todos os amigos que também
    se propuzeram a me ajudar aqui!
    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    [Resolvido]Referenciar egistro específico no subformulário Empty Referenciar registro específico no subformulário

    Mensagem  toyebom 3/9/2012, 17:02

    O forum agradece o retorno


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  JPaulo 3/9/2012, 17:29

    Resolvido, resolvido está.

    Para que fique a saber como funciona a formatação condicional e enriquecer os seus conhecimentos;

    Botão direito do mouse em cima do campo "Endereco", vai a formatação condicional e faz apenas isto;


    É o simples;

    [Resolvido]Referenciar egistro específico no subformulário 03-09-11


    .................................................................................
    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]Referenciar egistro específico no subformulário Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Referenciar egistro específico no subformulário Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Referenciar egistro específico no subformulário Folder_announce_new Instruções SQL como utilizar...

    Conteúdo patrocinado


    [Resolvido]Referenciar egistro específico no subformulário Empty Re: [Resolvido]Referenciar egistro específico no subformulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/11/2024, 00:52