** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Uso de comillas en vba para crear una consulta en
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoUso de comillas en vba para crear una consulta en

 Responder Responder
Autor
Mensaje
Jorge33 Ver desplegable
Habitual
Habitual


Unido: 09/Abril/2019
Localización: madrid
Estado: Sin conexión
Puntos: 58
Enlace directo a este mensaje Tema: Uso de comillas en vba para crear una consulta en
    Enviado: 18/Enero/2020 a las 07:41
Hola:

Tengo que crear una consulta con where en vba. El problema es que necesito incluir un valor y al incluir comillas me da error.
Sería algo así:
sql=sql+"where tabla1.tipo=("rojo")"

pero al incluir las comillas da error al interpretar que cierro las primeras.
¿como lo puedo solucionar?
Muchas gracias
Arriba
jilo Ver desplegable
Colaborador
Colaborador


Unido: 19/Diciembre/2004
Localización: TAFALLA
Estado: Sin conexión
Puntos: 959
Enlace directo a este mensaje Enviado: 18/Enero/2020 a las 08:58
Hola Jorge,
prueba así:

sql=sql & "where tabla1.tipo='rojo'"
Lo puedes pasar como variable, tambien, tal que así

variable="Rojo"
sql=sql & "where tabla1.tipo='" & variable & "'"
Espero te sirva !!!!!!
Iñaki
Arriba
javier.mil Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 10/Agosto/2005
Localización: España
Estado: Sin conexión
Puntos: 4830
Enlace directo a este mensaje Enviado: 18/Enero/2020 a las 13:06
Buenas

Truco: (solo lo utilizo cuando me acuerdo je...je...)
Declaro las comillas simples y dobles de la siguiente manera: Como constantes publicas dentro de un modulo standard

Const cComillasDobles As String = """"
Const cComillasSimples As String = "'"

y en lugar de escribir:
" los sustituyo por  cComillasDobles
y
' lo sustituyo por:  cComillasSimples



Aviso:
Const cComillasDobles As String = "Chr(34)" '<< No funciona
Const cComillasSimples As String = "Chr(39)" ' << No funciona
Const cComillasDobles As String = """"   '<< Si funciona
Const cComillasSimples As String = "'" '<< Si funciona

Arriba
Jorge33 Ver desplegable
Habitual
Habitual


Unido: 09/Abril/2019
Localización: madrid
Estado: Sin conexión
Puntos: 58
Enlace directo a este mensaje Enviado: 18/Enero/2020 a las 15:53
Muchas gracias. 
Es justo lo que necesitaba.
Se puede cerrar el tema
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable