Ayuda con una consulta desde el Query

[LeroyBrown]

Hola, a ver si podeis ayudarme. Hago una consulta desde el Quary de Excel a mi sql diciendo que me coga el ultimo cambio en dolares que haya en mi tabla o, en su defecto, el ultimo que hay puesto. Y me lo hace perfectamente. Esta es la consulta:

SELECT top 1 "Currency Exchange Rate"."Relational Exch_ Rate Amount"
FROM Monolitic.dbo."Currency Exchange Rate" "Currency Exchange Rate"
WHERE ("Currency Exchange Rate"."Currency Code"='USD') AND ("Currency Exchange Rate"."Starting Date" IN (SELECT MAX("Currency Exchange Rate"."Starting Date") FROM Basededatos.dbo."Currency Exchange Rate"))

Pero ahora quiero que me coga otra moneda, por ejemplo los yenes (JPY) pero no lo hace. En mi tabla están puestas las monedas en modo lista y da la casualidad que los dolares (USD) es la ultima moneda que hay, así que solo coge esa, necesito alguna instruccion que me recorra toda la tabla. Podeis ayudarme?.
Muchas gracias.

[flaviovich]

Aver prueba asi:

Código SQL:

SELECT TOP 2 CER."Relational Exch_ Rate Amount"
FROM Monolitic.dbo."Currency Exchange Rate" CER
WHERE CER."Currency Code" IN ('USD','JPY')
AND CER."Starting Date" = (
    SELECT MAX("Currency Exchange Rate"."Starting Date") 
    FROM Basededatos.dbo."Currency Exchange Rate")
)
 

[LeroyBrown]

Gracias, pero necesito que me coja uno u otro en cada caso. Es decir, si sólo quiero los JPY no debe de aparecer USD, nosé si me explico.
Muchas gracias por tu ayuda.

[flaviovich]

Y como escojes el tipo de moneda?
Imagino que sera un parametro que selecciona un usuario en tu hoja Excel.
Si es asi, entonces tu query debe concatenar el tipo de moneda seleccionado.

Código vb:

"... CER.[Currency Code] = '" & Moneda.Text & "' ..."
 

[LeroyBrown]

Gracias. No, la consulta la voy cambiando depende de la hoja, es usuario no tiene que hacer nada, són hojas independientes; con lo que una consulta la pongo sólo en dolares y la otra en yenes, nunca las dos juntas ni el usuario tiene que seleccionar nada. Por eso querria saber como hacerlo con yens sólo por ejemplo.
Muchas gracias por tu ayuda.

[flaviovich]

A ver, segun entiendo debes cambiar USD por JPY, pero no creo que sea eso.

Código SQL:

CER.[Currency Code] = 'JPY'
 

Lo otro que se me ocurre es que no sabes como pasar ese valor a tu query. En ese caso tu problema no es de SQL, sino de programacion (VBA).