SQL COM O OPERADOR LIKE NÃO FUNCIONA

 Tópico anterior Próximo tópico Novo tópico

SQL COM O OPERADOR LIKE NÃO FUNCIONA

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#490941 - 24/10/2019 22:50:38

FFABIOG
JOINVILLE
Cadast. em:Maio/2012


Senhores,

Tenho uma tabela no Excel e gostaria de fazer uma consulta com o operador like, porém não está retornando dados.

A consulta sem filtro funciona perfeitamente, conforme código abaixo:
  sql = "Select * From [CAD_CLI$]"


Porém ao colocar o operador like, não funciona,
  Public Sub Consultar()
    Dim ConexaoPlan As New ADODB.Connection
    Dim rsConsulta As New ADODB.Recordset
    Dim sql As String
                                                                                
    ConexaoPlan.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source =" & ThisWorkbook.Path & "\opt\banco.xlsm" & ";Extended Properties=Excel 8.0;"
    ConexaoPlan.Open
    
    sql = "Select * From [CAD_CLI$] where NOME_CLI like '*" & Me.txt_con.Text & "'"


Não consigo identificar o meu problema,

Agradeço pela ajuda.



#490942 - 25/10/2019 07:41:19

OMAR2007
MONTES CLAROS
Cadast. em:Maio/2019


Será o que está faltando não é isto
https://www.devmedia.com.br/usando-os-operadores-like-in-e-between-no-oracle/24687
  




Resposta escolhida #490944 - 25/10/2019 08:28:02

PERCIFILHO
MATAO [SP]
Cadast. em:Dezembro/2009


Última edição em 25/10/2019 08:29:00 por PERCIFILHO

Experimente trocar o "Like *" por "Like %"


____________________________________________________
Você sabe que alguém te ama não pelo que ele fala, mas pelo o que faz.
O amor não sobrevive de teorias.




#491137 - 07/11/2019 23:01:42

MARIOANDRADE
SANTO ANTONIO DE JESUS
Cadast. em:Abril/2012


Tente assim:
'Retorna os dados que começam com o que estiver em Me.txt_con.Text
sql = "Select * From [CAD_CLI$] where NOME_CLI like '" & Me.txt_con.Text & "%'"

Se não funcionar tente assim:
'Retorna os dados que começam com o que estiver em Me.txt_con.Text
sql = "Select * From [CAD_CLI$] where NOME_CLI like '" & Me.txt_con.Text & "*'"

Se desejar buscar qualquer parte digitada use:
sql = "Select * From [CAD_CLI$] where NOME_CLI like '*" & Me.txt_con.Text & "*'"

Ou:
sql = "Select * From [CAD_CLI$] where NOME_CLI like '%" & Me.txt_con.Text & "%'"

Um dos exemplos deve funcionar.
Espero ter ajudado.

Cursos de Excel e VB6:
cursoexcelvba.com.br



 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por FFABIOG em 07/11/2019 23:14:50