Hola
Tengo una consulta SQL escrita VBA para obtener datos, la primera me funciona y es ésta:
strSQL = "SELECT Guia, Fecha, NROFN, Cliente, Destinatario, Destino, NroPiezas, TipoServicio, Seguro, TarifaTotal " & _
"FROM [Consulta Guia ClienteX] " & _
"WHERE Fecha Between #" & [Forms]![MenuPrincipal]![SubForm2]![FechaInicial] & "# AND #" & [Forms]![MenuPrincipal]![SubForm2]![FechaFinal] & "# AND FormaPago='" & [Forms]![MenuPrincipal]![SubForm2]![FPago] & "' AND NalIntnal=1 AND Cancelada=0 "
Ahora, necesito agregar el campo destino (es texto), si hay datos en el textbox destino que lo busque y si no hay, que tome todos los destinos, lo hice asi, pero no me funciona:
strSQL = "SELECT Guia, Fecha, NROFN, Cliente, Destinatario, Destino, NroPiezas, TipoServicio, Seguro, TarifaTotal " & _
"FROM [Consulta Guia ClienteX] " & _
"WHERE Destino Like IIf(IsNull([Forms]![MenuPrincipal]![SubForm2]![Destino])," * ",[Forms]![MenuPrincipal]![SubForm2]![Destino] AND Fecha Between #" & [Forms]![MenuPrincipal]![SubForm2]![FechaInicial] & "# AND #" & [Forms]![MenuPrincipal]![SubForm2]![FechaFinal] & "# AND FormaPago='" & [Forms]![MenuPrincipal]![SubForm2]![FPago] & "' AND NalIntnal=1 AND Cancelada=0 "
Alguien me puede ayudar por favor, le estaré muy agradecido...
Saludos
Franklin S.P.
