Hämta från flera db - VBA-kod i Excel.

VBA-kod i Excel.

Har idag en sql-fråga som ger mig kundnummer samt diverse fakta om kunden.
Nu vill jag från en annan databas hämta mer fakta, då med hjälp av kundnummret jag får fram i den tidigare frågan.
Hur göra detta bäst? Hämta allt i en loop? Hämta det ena först och sen det andra?
Kanske kan man skriva om frågorna?

Tips, ideer mottages tacksamt.

select    dbi.kundnummer , namn, SUM(belopp), SUM(belopp) / (13 - 01 + 1),  kategori   from dbi, kund where  vecka >= '2003'||'-'||'01' and vecka <= '2003'||'-'||'13'  and dbi.kundnummer = kund.kundnummer and kund.grupp = '500' Group by dbi.kundnummer, namn, kategori

Resultatet av denna loopar jag sen ut:

   Do While Not rs.EOF
        Worksheets("blad").Range("A" & i).Value = CStr(rs(0))
        Worksheets("blad").Range("B" & i).Value = CStr(rs(1))
	'osv	
        i = i + 1
        rs.MoveNext
    Loop

Till detta vill jag i i "C"-kolumnen lägga till datat som denna sql-fråga ger:

select sum(belopp) from dbi, kund, stad  where vecka >= '2003-01' and vecka <= '2003-13'  and dbi.kundnummer = kund.kundnummer  and kund.kundnummer = '10000' and kund.stad = stad.stad

Dessa sql-frågor byggs upp av värden i celler i ett excelark.
Kruxet är då, att kundnummret jag använder i denna fråga är det jag får ut i den första frågan, hur gör jag detta bäst?
Anledningen till två frågor är att de kopplar mot olika databaser.