[Resolvido]Consulta SQL com erro de sintaxe

Olá Colegas,

Tenho até vergonha de postar, mas estou procurando solução há dias e no apuro, então peço socorro.
O código abaixo está apresentando o seguinte erro:

Erro em tempo de execução '3075'
Erro de sintaxe (operador faltando) na expressão de consulta.

Private Sub Comando0_Click()
Dim dbAASI As Database
Dim rsAASI As Recordset
Dim ConsultaRegistro As Recordset
Dim strSQL As String
Dim RegZeros As String
Set dbAASI = CurrentDb()
Set rsAASI = dbAASI.OpenRecordset("Tb_Fornecedores", dbOpenDynaset)
   With rsAASI
   strSQL = "SELECT * FROM Tb_Fornecedores WHERE RazaoSocial = " & Me.Ed_Fornecedor & ""
   Set ConsultaRegistro = CurrentDb.OpenRecordset(strSQL)     -----> quando pede para depurar é aqui que o cursor pára.
       If ConsultaRegistro.RecordCount <> 0 Then
           MsgBox "Erro na Consulta de dados!", vbInformation, "Tabela Fornecedores:"
       Else
           Me.Ed_CNPJ = !CNPJ
           Me.Ed_ValorTotal = !ValorTotal
       End If
   End With
   rsAASI.Close
End Sub



Editado:
_______

A consulta busca por nome de fornecedor, completo, com maiúsculas, acentos e espaços.
Ex.: Ágil Sys Informática Ltda

Olá Luiz,

Provavelmente o campo RazaoSocial é texto, e ai tem que colocar o APÓSTROFO antes das aspas.
Segue.


strSQL = "SELECT * FROM Tb_Fornecedores WHERE RazaoSocial =' " & Trim(Me.Ed_Fornecedor) & " ' "


Boa sorte !!!

Colega... demais...
Exatamente. Alterei conforme sugestão e funcionou perfeitamente.
Muito obrigado mesmo.

Mas tire uma dúvida: o formato que estava busca por que tipo de campos?
O que você sugeriu busca por strings, certo?
Onde posso encontrar algo sobre estes formatos?

Valeu Luiz
O fórum agradece !!!

Respondendo suas perguntas:

Mas tire uma dúvida: o formato que estava busca por que tipo de campos?

A sintaxe que vc criou funcionaria para campos numéricos inteiros.
Ex.: "SELECT * FROM Tb_Fornecedores WHERE CodFornec = 123 "

Quando se faz pesquisa em campos do tipo texto, é necessário acrescentar o apóstrofo antes das aspas.
Ex.: "SELECT * FROM Tb_Fornecedores WHERE RazaoSocial ='BANCO BRADESCO S/A' "

Onde posso encontrar algo sobre estes formatos?

support.office.com/pt-br/article/introdu%C3%A7%C3%A3o-aos-tipos-de-dados-e-%C3%A0s-propriedades-de-campo-30ad644f-946c-442e-8bd2-be067361987c

Site do Macoratti (Mestre!!!)

http://www.macoratti.net/d150102.htm


Acredito que vai te ajudar em alguma coisa.

Boa sorte, amigo !!!