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

    Filtro em Subformulario a partir do Formulário

    avatar
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 12/9/2013, 11:34

    Amigos,

    Estou tentando filtrar o meu subformulário a partir de uma caixa de combinação no formulário.
    Sei que aqui tem vários exemplos mas, realmente não estou conseguindo!

    Estou postando o banco para que possam me ajudar!

    O formulário é o "FrmCadContrato" e preciso que ao selecionar o Fornecedor 1 campo "Empresa", apareçam apenas os equipamentos referente a empresa selecionada no subformulário.
    Anexos
    Filtro em Subformulario a partir do Formulário AttachmentSCLA-ADM.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1 Mb) Baixado 40 vez(es)
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  criquio 12/9/2013, 13:07

    Já tentou no evento "Após atualizar" desse campo aonde vai digitar a pesquisa colocar algo assim?

    Código:
    Me.NomeDoSubForm.Form.RecordSource = "SELECT * FROM NomeDaTabela WHERE NomeCampoDaPesquisaNaTabela LIKE '" & Me.NomeCampoDaPesquisaNoForm & "'"
    No caso acima terá que digitar o nome certinho. Para pesquisar por parte do nome, basta acrescentar asteriscos:

    Código:
    Me.NomeDoSubForm.Form.RecordSource = "SELECT * FROM NomeDaTabela WHERE NomeCampoDaPesquisaNaTabela LIKE '*" & Me.NomeCampoDaPesquisaNoForm & "*'"
    Tambem é possível ir filtrando à medida que for digitando se colocar no evento "Ao alterar" do campo de pesquisa e colocar .Text na frente do nome do campo: ... & Me.NomeCampoDaPesquisaNoForm.Text &...


    .................................................................................
    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
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 13/9/2013, 11:29

    Criquio, tentei fazer exatamente como falou mas não funcionou!
    Existe outra forma de solucionar?


    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  criquio 13/9/2013, 13:28

    Ao que parece vai ser mais prático você alterar a estrutura do aplicativo. Você está tentando unir mais de uma tabela no source do subformulário mas o subformulário só pode ter uma fonte por vez quando a função dele é cadastrar dados. Até pode ter mais de um source quando isso é feito em uma consulta com fins apenas de visualização.


    .................................................................................
    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
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 15/9/2013, 20:55

    Criquio o aplicativo está basicamente pronto apenas este filtro não funciona. Seria possível fazer funcionar sem ter que alterar a estrutura?
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  criquio 15/9/2013, 23:04

    Dê mais uma detalhada no que precisa. Você quer selecionar o quê e aonde? No formulário ou no subformulário? Depois de selecionado, quer que seja filtrado o quê? Esse "o quê" está no formulário ou no subformulário? Explique na ordem dos acontecimentos por favor. Exemplo:

    Selecionar um valor na combo "cboNome" que está no formulário frmControle e filtrar a combo "cboFerramentas" que está no subformulário "subControle" dentro do "frmControle".


    .................................................................................
    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
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 16/9/2013, 02:11

    Criquio, preciso que ao selecionar no formulário o campo Empresa no subformulario o campo Equipamentos seja filtrado apenas com os equipamentos do fornecedor correspondente.
    avatar
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 17/9/2013, 16:01

    Mestres, mais alguem consegue me ajudar?
    Realmente, não estou conseguindo descobrir o que estou fazendo de errado!
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  criquio 17/9/2013, 16:26

    Nas propriedades dessa combo que você quer filtrar tem uma linha de origem dos dados aonde deve estar ou o nome da tabela ou uma cláusula SQL mais ou menos assim:

    SELECT NomeTabela.NomeCampo1, NomeTabela.NomeCampo2 FROM NomeTabela..."

    Se estiver apenas o nome da tabela, mude para SQL. Se já estiver a SQL, acrescente o filtro nela:

    Código:
    SELECT NomeTabela.NomeCampo1, NomeTabela.NomeCampo2 FROM NomeTabela WHERE CampoDaTabela LIKE '"* & Forms!NomeDoForm!NomeDaCombo & "*'"
    Nessa combo do formulário, dê uma requery na combo do subformulário para atualiza-la, usando o evento "Após atualizar":

    Código:
    Me.NomeDoSubform.Form.NomeDaCombo.Requery


    .................................................................................
    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
    kennyraphael
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 226
    Registrado : 12/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  kennyraphael 17/9/2013, 20:29

    Também estou precisando disso  , porém  quando fui utilizar este comando apareceu o seguinte erro :}
    Código:
    Private Sub Texto39_Change()
    Me.Obrasubformulario1.Form.RecordSource = "ID_FUNCIONARIO * FROM OBRA WHERE  LIKE '*" & Texto49 & "*'"
    = Erro de copilação
    variavel não definida


    Última edição por kennyraphael em 17/9/2013, 21:33, editado 1 vez(es)
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  criquio 17/9/2013, 20:35

    A sintaxe seria assim:

    Código:
    Me.Obrasubformulario1.Form.RecordSource = "SELECT * FROM OBRA WHERE ID_FUNCIONARIO LIKE '*" & Texto49 & "*'"
    A leitura do código precisa seguir a ordem correta:

    Selecione todos os registros da tabela Obra aonde o id do funcionário for igual ao id do campo Texto49


    .................................................................................
    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
    kennyraphael
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 226
    Registrado : 12/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  kennyraphael 17/9/2013, 21:36

    erro no texto 39 :

    erro de compilação
    metodo ou membro de dados nao encontrados
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  criquio 17/9/2013, 21:42

    Deve ter algum nome de campo ou da tabela ou do formulário incorreto.


    .................................................................................
    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
    kennyraphael
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 226
    Registrado : 12/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  kennyraphael 20/9/2013, 13:20

    entendi , agora tirando uma duvida sobre o form do nosso amigo , como ele fez parao access abrir deste tamanho ?
    avatar
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 20/9/2013, 14:35

    Criquio,

    Tentei fazer o filtro mas como ele implica em atualização de outros campos apesar de parecer funcionar a forma que sugeriu, os demais campos ficam preenchidas com "#Erro"
    Nao sei mais o que fazer, alguma idéia?

    Abs,


    Kennyraphael,

    O tamanho do formulario vc define quando for criá-lo!
    Agora se quer saber como fazer pra ele aparecer como uma janela a parte do access, basta definí-lo como pop-up.
    Se precisar de mais informações procure aqui no site que você encontrará vários exemplos!

    E lembre-se nova dúvida, novo tópico, ok?

    Abs!
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  criquio 20/9/2013, 15:29

    Observando melhor, me parece que seria mais prático você fazer o seguinte: colocar a combo do subform com duas colunas, sendo uma oculta para receber a id e a outra visível para receber o nome. Fazer a mesma coisa na combo do formulário principal. E no "Após atualizar" do form principal, você muda o source da combo do subform:

    Me.NomeDoSubForm.Form!NomeDaCombo.RowSource = "O Select da combo do subform aqui"


    .................................................................................
    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
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 20/9/2013, 21:02

    Não tinha pensado nisso, vou testar e dou um retorno!
    Obrigado!
    avatar
    amelioneto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/04/2013

    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  amelioneto 2/10/2013, 23:37

    Criquio, desculpe a demora em dar um retorno!
    Muito trabalho e muitas mudanças no trabalho!

    Infelizmente não consegui fazer filtrar mesmo da maneira que sugeriu!
    Não sei nem mais o que estou fazendo de errado!



    Conteúdo patrocinado


    Filtro em Subformulario a partir do Formulário Empty Re: Filtro em Subformulario a partir do Formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 11:06