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]Verificar dados de um campo específico ao aplicar filtro

    avatar
    gomesaraujo1980
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 12/04/2011

    [Resolvido]Verificar dados de um campo específico ao aplicar filtro Empty [Resolvido]Verificar dados de um campo específico ao aplicar filtro

    Mensagem  gomesaraujo1980 15/4/2011, 14:02

    Prezados, bom dia.
    Venho mais uma vez pedir a ajuda dos Srs.
    Criei um código em que, ao se selecionar uma opção num determinado campo do meu formulário (Tipo de Venda), outros campos são habilitados (ou não) dependendo da opção selecionada.
    Para inserção de novos registros tá funcionando perfeitamente, porém este formulário não é só para registros novos. Há a opção de se entrar no formulário diretamente no modo de pesquisa e procurar um registro existente para se fazer alterações.
    Quando entro no formulário por essa opção é que aparece meu problema: os campos de pesquisa são outros ("Filial" e "Nº da Viagem") e assim o formulário não lê novamente aquele campo de referência para o código ("Tipo de Venda") deixando todos os outros campos desabilitados.
    Assim, gostaria de saber como faço para que, num evento "Aplicar Filtro" do meu formulário, o código vá até o campo "Tipo de Venda", leia o valor nele contido e aplique a regra de habilitação de campos da mesma forma que para novos registros.

    Fico no aguardo e agradeço de antemão a ajuda.
    Renato
    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]Verificar dados de um campo específico ao aplicar filtro Empty Re: [Resolvido]Verificar dados de um campo específico ao aplicar filtro

    Mensagem  criquio 15/4/2011, 14:12

    Se você postar o código usado fica mais fácil a gente visualizar.


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

    avatar
    gomesaraujo1980
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 12/04/2011

    [Resolvido]Verificar dados de um campo específico ao aplicar filtro Empty Re: [Resolvido]Verificar dados de um campo específico ao aplicar filtro

    Mensagem  gomesaraujo1980 15/4/2011, 14:20

    Criquio, o código que estou utilizando para novos registros é este:

    Private Sub Tipo_de_Venda_AfterUpdate()

    If Tipo_de_Venda = "VENDA AMBULANTE" Then

    Me.Volume_NF_Direta__original_.Value = 0
    Me.Volume_NF_Transferência__original_.Value = 0
    Me.Volume_Total_NF_Devolução.Value = 0
    Me.Volume_NF_Complementar.Value = 0

    Me.Volume_NF_Ambulante__original_.Enabled = True
    Me.Volume_NF_Direta__original_.Enabled = False
    Me.Volume_NF_Transferência__original_.Enabled = False
    Me.Volume_Total_NF_Devolução.Enabled = False
    Me.Volume_NF_Complementar.Enabled = False
    Me.Volume_Total_Faturado__apenas_vd_ambulante_.Enabled = True
    Else

    If Tipo_de_Venda = "VENDA DIRETA" Then

    Me.Volume_NF_Ambulante__original_.Value = 0
    Me.Volume_NF_Transferência__original_.Value = 0
    Me.Volume_Total_Faturado__apenas_vd_ambulante_.Value = 0

    Me.Volume_NF_Ambulante__original_.Enabled = False
    Me.Volume_NF_Direta__original_.Enabled = True
    Me.Volume_NF_Transferência__original_.Enabled = False
    Me.Volume_Total_NF_Devolução.Enabled = True
    Me.Volume_NF_Complementar.Enabled = True
    Me.Volume_Total_Faturado__apenas_vd_ambulante_.Enabled = False
    Else

    If Tipo_de_Venda = "TRANSFERÊNCIA" Then

    Me.Volume_NF_Ambulante__original_.Value = 0
    Me.Volume_NF_Direta__original_.Value = 0
    Me.Volume_Total_Faturado__apenas_vd_ambulante_.Value = 0

    Me.Volume_NF_Ambulante__original_.Enabled = False
    Me.Volume_NF_Direta__original_.Enabled = False
    Me.Volume_NF_Transferência__original_.Enabled = True
    Me.Volume_Total_NF_Devolução.Enabled = True
    Me.Volume_NF_Complementar.Enabled = True
    Me.Volume_Total_Faturado__apenas_vd_ambulante_.Enabled = False
    Else

    Me.Volume_NF_Ambulante__original_.Enabled = True
    Me.Volume_NF_Direta__original_.Enabled = True
    Me.Volume_NF_Transferência__original_.Enabled = True
    Me.Volume_Total_NF_Devolução.Enabled = True
    Me.Volume_NF_Complementar.Enabled = True
    Me.Volume_Total_Faturado__apenas_vd_ambulante_.Enabled = True
    End If
    End If
    End If

    End Sub

    Tentei transcrever ele para um sub Form_ApplyFilter, mas não funciona!

    Grato pela ajuda.
    Renato

    Conteúdo patrocinado


    [Resolvido]Verificar dados de um campo específico ao aplicar filtro Empty Re: [Resolvido]Verificar dados de um campo específico ao aplicar filtro

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 16:36