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


2 participantes

    [Resolvido]Impedir registro duplicado em subform

    augustopimenta
    augustopimenta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 19/03/2012

    [Resolvido]Impedir registro duplicado em subform Empty Impedir registro duplicado em subform

    Mensagem  augustopimenta 18/3/2013, 00:03

    Olá pessoal ..
    Já procurei no form e não encontrei nada que funcionasse sobre esse assunto..
    Encontrei alguns códigos mas não deram certo..
    Tenho a tblQdAndar e a tblDetQdAndar ..
    O frmQdAndar e o sfrmDetQdAbdar ....
    Cadastro a QdAndar no frmQdAndar e os serviços de cada QdAndar no sfrmDetQdAndar (subform).. Acontece que os serviços não podem se repetir na mesma qdAndar.
    No frmQdAndar tenho os campos: CodQdAndar e DescricaoQdAndar..
    No sfrmDetQdAndar tenho os campos: CodDetQdAndar, Cod. Servico, Descricao do Servico e ValoUnitario...
    Como impedir que o mesmo serviço seja cadastrado na mesma qdAndar ..???
    Desde já agradeço ...
    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]Impedir registro duplicado em subform Empty Re: [Resolvido]Impedir registro duplicado em subform

    Mensagem  criquio 18/3/2013, 00:41

    Amigão, faça mais uma pesquisa no fórum. Há alguns tópicos sobre o assunto. Pesquise por "repetição", "evitar repetição", "não repetir"...


    .................................................................................
    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.

    augustopimenta
    augustopimenta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 19/03/2012

    [Resolvido]Impedir registro duplicado em subform Empty Re: [Resolvido]Impedir registro duplicado em subform

    Mensagem  augustopimenta 18/3/2013, 01:42

    Olá Criquio..
    Sempre encontro este código:
    Private Sub Numero_BeforeUpdate(Cancel As Integer)
    If (Not IsNull(DLookup("[NUmero]", "T_Funcionarios", _
    "[Numero] ='" & Me!Numero & "'"))) Then
    MsgBox "Funcionario Registado", _
    vbInformation, "Funcionario Registado"
    End If
    End Sub

    Utilizo este código em outro form e funciona perfeito..

    Mas agora a situação é diferente como disse acima...
    Teria alguma dica ???
    augustopimenta
    augustopimenta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 19/03/2012

    [Resolvido]Impedir registro duplicado em subform Empty Re: [Resolvido]Impedir registro duplicado em subform

    Mensagem  augustopimenta 18/3/2013, 14:31

    Ok Criquio .. Vc venceu .. rsrs
    Utilizei o seguinte código :::

    Private Sub cboCodigo_BeforeUpdate(Cancel As Integer)
    If DCount("[Codigo]", "TabTeste", "[Codigo]=" & [cboCodigo]) > 1 Then
    MsgBox "Registro já selecionado", vbCritical
    DoCmd.CancelEvent
    End If
    End Sub

    Parece funcionar muito bem...
    Obrigado pela dica de como procurar o assunto ..
    Sucesso ...
    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]Impedir registro duplicado em subform Empty Re: [Resolvido]Impedir registro duplicado em subform

    Mensagem  criquio 18/3/2013, 22:18

    Grato pelo retorno. O fórum agradece.


    .................................................................................
    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.


    Conteúdo patrocinado


    [Resolvido]Impedir registro duplicado em subform Empty Re: [Resolvido]Impedir registro duplicado em subform

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/4/2024, 04:11