forkorte forespørgsel

koden er nederst
det er vbakode, der skal hente ind i excel

hvordan gør jeg så jeg kan skrive fa i stedet for fakturaer alle stedet?

altså fa.modtageradresse istedet for fakturaer.modtageradresse

har prøvet at: dim fa as string
              fa = "fakturaer"
men virker ikke.


.CommandText = Array( _
        "SELECT Fakturaer.Modtagernavn, Fakturaer.Modtageradresse, Fakturaer.Modtagerby, Fakturaer.Modtagerområde, Fakturaer.Modtagerpostnr, Fakturaer.Modtagerland, Fakturaer.`Kunde-ID`, Fakturaer.Kunder.Firma" _
        , _
        "navn, Fakturaer.Adresse, Fakturaer.Bynavn, Fakturaer.Område, Fakturaer.Postnr, Fakturaer.Land, Fakturaer.Sælger, Fakturaer.Ordrenr, Fakturaer.Ordredato, Fakturaer.Leveringsdato, Fakturaer.Forsendelses" _
        , _
        "dato, Fakturaer.Speditionsfirmaer.Firmanavn, Fakturaer.Produktnr, Fakturaer.Produktnavn, Fakturaer.`Pris pr enhed`, Fakturaer.Antal, Fakturaer.Rabat, Fakturaer.Varetotal, Fakturaer.Fragtomkostninger" & Chr(13) & "" & Chr(10) & "" _
        , _
        "FROM `C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Northwind`.Fakturaer Fakturaer" & Chr(13) & "" & Chr(10) & "WHERE (Fakturaer.Ordredato={ts '1996-12-04 00:00:00'}) OR (Fakturaer.Ordredato={ts '1996-12-03 00:00:00'})" _
        )