Excel macro - runtime error

Before:
RunQuery("SELECT a.whse, COUNT (DISTINCT a.load_nbr) , COUNT (DISTINCT b.distro_nbr) FROM mpp_asn_headerr")
 
Run-time error '-2147417848 (80010108)'
Method ' CreateeDynaset ' of object ' _IOraDatabase ' failed '

solusi : 

Call RunQuery("SELECT a.whse as whse, COUNT (DISTINCT a.load_nbr) as countsatu, COUNT (DISTINCT b.distro_nbr) as countdua FROM mpp_asn_headerr")

COUNT(DISTINCT a.load_nbr) ga ke eksekusi sama si macro, saat diberi as countsatu (penamaann) query nya mau running