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

    Filtro de pesquisa dentro de Listbox no VBA com banco access

    avatar
    Jtsp
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 29/06/2014

    Filtro de pesquisa dentro de Listbox no VBA com banco access Empty Filtro de pesquisa dentro de Listbox no VBA com banco access

    Mensagem  Jtsp 6/7/2014, 20:34

    quero fazer um filtro de pesquisa sequencial. mas a ideia e ter uma comparação o e qual a um filtro entre datas
    teria que fazer ate mais caixa de combinação.
    teria que mostra o intervalo de datas do 25/06/2014 ate o dia 28/06/2014. ex: todos do dia 25/06/2014, 26/06/2014 ,27/06/2014 , 28/06/2014.
    teria que mostra o intervalo entre nome do 1 ate o 4. o de data conseguir mas do nome não. EX: 1 ,2, 3, 4.

    se alguem poder me ajudar, agradeceria muito. obrigado desde já.

    Dim valor_pesq As String
    Dim valor_pesq2 As String


    Private Sub cbo_dataini_Change()

    cbo_dataini.AddItem "23/06/2014"
    cbo_dataini.AddItem "28/06/2014"

    Filtro1

    End Sub
    Private Sub cbo_datafin_Change()
    cbo_datafin.AddItem "23/06/2014"
    cbo_datafin.AddItem "28/06/2014"

    Filtro1

    End Sub

    Private Sub cbo_nome_Change()

    valor_pesq = cbo_nome.Text

    Filtro1

    End Sub

    Private Sub cbo_nome2_Change()

    valor_pesq2 = cbo_nome2.Text

    Filtro1

    End Sub


    Private Sub Filtro1()


    Dim ComandoSQL As String


    ComandoSQL = "select * from tabela_balancim where Data Between #" & Format(Me!txt_dataini, "mm/dd/yyyy") & "# AND #" & Format(Me!txt_datafin, "mm/dd/yyyy") & "# and Operador between #" & valor_pesq & " # and # " & valor_pesq2 & "#"

    Call Conecta


    Set consulta = banco.OpenRecordset(ComandoSQL)


    On Error Resume Next

    ListView1.ListItems.Clear

    While Not consulta.EOF
    Set List = ListView1.ListItems.Add(Text:=consulta(0)) 'id
    List.SubItems(1) = consulta(1)
    List.SubItems(2) = consulta(2)
    List.SubItems(3) = consulta(3)
    List.SubItems(4) = consulta(4)
    List.SubItems(5) = consulta(5)
    List.SubItems(6) = consulta(6)
    consulta.MoveNext
    Wend
    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 de pesquisa dentro de Listbox no VBA com banco access Empty Re: Filtro de pesquisa dentro de Listbox no VBA com banco access

    Mensagem  criquio 6/7/2014, 21:25

    Isso é VB ou é um controle listview dentro de um formulário Access? Não entendi muito bem.


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


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 29/06/2014

    Filtro de pesquisa dentro de Listbox no VBA com banco access Empty olá

    Mensagem  Jtsp 6/7/2014, 22:21

    olá, criquio

    o um formulário vba com o banco access. o um formulário vba que mostrar as informações do banco access. é um controle listview dentro de um formulário vba que tem interação com o banco access .
    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 de pesquisa dentro de Listbox no VBA com banco access Empty Re: Filtro de pesquisa dentro de Listbox no VBA com banco access

    Mensagem  criquio 7/7/2014, 14:57

    Não entendi essa parte do intervalo de 1 a 4. Descreva isso simulando algumas linhas na forma que precisa que apareça.


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


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 29/06/2014

    Filtro de pesquisa dentro de Listbox no VBA com banco access Empty olá

    Mensagem  Jtsp 7/7/2014, 22:40

    Olá, estou enviando uma imagem do que seria feito seria um filtro de consulta.

    na imagem vemos que o filtro de datas esta funcionando com data inicial e data final esta mostrando o intervalo do dia 06/07/2014 ate 07/07/2014.

    a ideia e fazer o mesmo com os outros campos. mostrando o intervalo entre um e outro, do mesmo jeito que a datas

    obrigado.

    Conteúdo patrocinado


    Filtro de pesquisa dentro de Listbox no VBA com banco access Empty Re: Filtro de pesquisa dentro de Listbox no VBA com banco access

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 07:08