MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Ordenar ao filtrar

    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4213
    Registrado : 06/11/2009

    [Resolvido]Ordenar ao filtrar Empty [Resolvido]Ordenar ao filtrar

    Mensagem  Assis em 7/3/2020, 13:33

    Boa tarde Amigos

    O código abaixo funciona bem.

    Mas como ordenar a filtragem por "Nome" ?

    Obrigado

    Private Sub txtFiltro_Change()
    Dim strSql As String

    strSql = "SELECT Nome,contribuinte, cidade FROM Clientes WHERE " & _
    "strConv(Nome, 2) like '*" & StrConv(Me!txtFiltro.Text, 2) & "*'" & _
    "OR strConv(contribuinte, 2) like '" & StrConv(Me!txtFiltro.Text, 2) & "*'" & _
    "OR strConv(cidade, 2) like '" & StrConv(Me!txtFiltro.Text, 2) & "*';"

    Me!Texto77.RowSource = strSql

    End Sub


    .................................................................................
    *** Só sei que nada sei ***
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2137
    Registrado : 22/11/2016

    [Resolvido]Ordenar ao filtrar Empty Re: [Resolvido]Ordenar ao filtrar

    Mensagem  DamascenoJr. em 7/3/2020, 13:45

    ..."OR strConv(cidade, 2) like '" & StrConv(Me!txtFiltro.Text, 2) & "*' ORDER BY Nome;"

    Vale lembrar que nomear um campo com a palavra "Nome" vai contra as recomendações de não usar palavras reservadas pois isso pode ocasionar problemas ao referenciar objetos. Para evitar isso passei a nomear meus campos nas tabelas com o prefixo "cp", nesse caso ficaria cpNome.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4213
    Registrado : 06/11/2009

    [Resolvido]Ordenar ao filtrar Empty Re: [Resolvido]Ordenar ao filtrar

    Mensagem  Assis em 7/3/2020, 13:52

    Obrigado Damasceno

    + rápido impossível . Funciona perfeito

    Quanto a "Nome" a BD já não é de agora, se der problema tenho que dar um trato

    Bom fim de semana


    .................................................................................
    *** Só sei que nada sei ***

      Data/hora atual: 9/8/2020, 14:39