DoCmd.OutputTo acQuery, "SORGU_ADI", "MicrosoftExcel(*.xls)", "", False, "", 0
yazarakta deneyebilirsiniz.

Bir düğme oluşturup, tıklandığında olayına;