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]Mensagem de aviso

    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de aviso

    Mensagem  tentar Qui 10 Out 2013, 20:48

    Olá!
    Possuo uma Tabela a qual prencho por um SubFormulário. Gostaria de saber como faço para que qndo digite um campo já digitado, ela me informe que já existe. Ex. Quando digitar um número (123) ele me retorne informando que já existe 123. Lembrando que existem muitos numeros, exemplo. 124,648,348, (não seão sequencias...Aguardo contato...
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 940
    Registrado : 09/11/2012

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  =>Nois Sex 11 Out 2013, 00:38

    olá,


    abra a tabela em modo design

    defina o campo como chave primaria, ou para não aceitar valores duplicados


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de Aviso

    Mensagem  tentar Sex 11 Out 2013, 13:34

    Ok, mas eu só queria que emitisse o aviso que já existe lançamento, porque preciso mesmo que ele exista lançar para finalizar o lançamento, mititindo um sinal de aviso para que possa procurar e lançar os demais dados. Teria como???
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 940
    Registrado : 09/11/2012

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  =>Nois Sex 11 Out 2013, 13:37

    Pd ser atraves de uma mensagem, no evento apos atualizar,
    vou fazer um exemplo e te mando logo em seguida


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de aviso

    Mensagem  tentar Sex 11 Out 2013, 13:55

    Ok....
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 940
    Registrado : 09/11/2012

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  =>Nois Sex 11 Out 2013, 13:59

    fiz um simples aqui mas funcional, segue


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de aviso

    Mensagem  tentar Sex 11 Out 2013, 15:51

    Ok....estou analisando....
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de Aviso

    Mensagem  tentar Sex 11 Out 2013, 17:31

    Olá..
    Vi o Banco....só que não estou conseguindo saber como vou adaptar ao atual....Exemplo: Tenho uma Tabela a qual a alimento pelo formulário. No q vc montou vc acrescentou uma coluna para que qndo vc digitasse ele atomaticamente surge no campo e ai informe que já existe um lançamento? Não sei como fazer no meu bco...como vc me orientaria isso fica difícil de adaptar? teria q alterar alguma outra parte do bco por exemplo....relatório, formulário, ou apenas alteraria a tabela? Aguardo mais informações. E obrigada pela atenção...
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 940
    Registrado : 09/11/2012

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  =>Nois Sex 11 Out 2013, 17:36

    Olá,

    são apenas duas caixas de texto não vinculadas a tabela em um formulário contínuo

    uma utiliza a formula dcontar, e outra referencia ao campo onde quer seja seu codigo de referencia

    bom é isso, se quiser postar uma parte do seu banco pra dar uma olhada study 


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de Aviso

    Mensagem  tentar Sex 11 Out 2013, 18:33

    Como mando o bnco/ Estou tentando e não consigo, zipei o tamanho dele é 18KB
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 940
    Registrado : 09/11/2012

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  =>Nois Sex 11 Out 2013, 20:37

    tem um botão logo abaixo escolher arquivo / enviar utilize o firefox o internet explorer q no chrome para que da uns problemas


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem Aviso

    Mensagem  tentar Sex 11 Out 2013, 20:50

    Envio o banco...
    Anexos
    [Resolvido]Mensagem de aviso AttachmentMensagem de Aviso - Cópia - Cópia.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (18 Kb) Baixado 23 vez(es)
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 940
    Registrado : 09/11/2012

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  =>Nois Sex 11 Out 2013, 22:20

    oi fiz a adaptação,

    as colunas com os codigos apenas ocultei arrastando no tamanho na coluna, pd ver que no modo desgin estão la

    ate mais


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de Aviso

    Mensagem  tentar Sab 12 Out 2013, 12:57

    Oi...Ficou muito legal...mas haveria condições dessa mensagem aparecer antes de atualizar? Pois acaso eu não quisesse inserir naquele momento a anotação não seria inserida.
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1145
    Registrado : 07/05/2011

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  Lupércio Dom 13 Out 2013, 12:31

    Veja com mensagem de alerta, e opção de manter ou não ou registro!


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.lol!Rolling Eyes
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de aviso

    Mensagem  tentar Seg 14 Out 2013, 15:28

    Olá... ficou legal...Só tem um porém....qndo coloco no bco atual mudando o nome de CNPJ_ (para outro), ele abre a tela do visal basic Private Sub CNPJ_BeforeUpdate(Cancel As Integer) está apresentando uma mensagem : erro de compilação, era esperado fim de instrução.
    O bco em q vc alterou sê abrir pelo formulário que enviei tbm apresenta um erro. Qndo abro pelo o q vc fez está legal. Então a minha pergunta o que faço? visto q tenho q alterar no bco atual, será que é pq já existe uma macro para abrir a tabela??. Aguardo contato para tentar finalizar esse tópico, oK?
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1145
    Registrado : 07/05/2011

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  Lupércio Seg 14 Out 2013, 15:43

    O erro está ai nessa mudança dos controles!
    Verificar a ortografia, se não conseguires poste o código ou o banco que veremos!


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.lol!Rolling Eyes
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1145
    Registrado : 07/05/2011

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  Lupércio Seg 14 Out 2013, 15:49

    Uma pergunta você copiou o módulo?
    Que coloquei no banco que te enviei?

    Se não copiou abra um módulo novo e cole:

    Public Function Confirmar(sMensagem As String) As Boolean
    Dim intResp As Integer
    intResp = MsgBox(sMensagem, vbYesNo + vbQuestion, "Atenção!")
    If intResp = vbYes Then
    Confirmar = True
    Else
    Confirmar = False


    End If
    End Function




    Lembrando que essa função é do meu amigo Norberto.


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.lol!Rolling Eyes
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1145
    Registrado : 07/05/2011

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  Lupércio Seg 14 Out 2013, 15:53

    Qualquer coisa poste o bd, se possível!
    Ficamos no aguardo.


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.lol!Rolling Eyes
    avatar
    tentar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 212
    Registrado : 03/05/2013

    [Resolvido]Mensagem de aviso Empty Mensagem de Aviso

    Mensagem  tentar Seg 14 Out 2013, 15:56

    Olá a todos! Enfim depois de quebrar a cabeça rsrsrs, consegui resolver. Foi só tirar BeforeUpdate que funcinou perfeitamente. Valeu!!!!!!!!! Estou muito feliz por isso. A tdos que me ajudaram meus agradecimentos.
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1145
    Registrado : 07/05/2011

    [Resolvido]Mensagem de aviso Empty Re: [Resolvido]Mensagem de aviso

    Mensagem  Lupércio Seg 14 Out 2013, 16:10

    O fórum agradece o retorno!


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.lol!Rolling Eyes

      Data/hora atual: Qui 27 Jan 2022, 00:34