Merhaba;
Formunuza bir buton ekleyin.
Butonun Click olayına

On Error GoTo hata 

DoCmd.OutputTo acQuery, "Sorgu1", "MicrosoftExcel(*.xls)", "", False, "", 0 

Cikis:

 MsgBox "kaydetme işlemi iptal edildi"

Exit Sub

hata: 

If Err.Number = 2501 Then

        Resume Next

    Else 

        MsgBox Err.Description

        Resume Cikis

    End If

yazın ve arama işlemi sonrasında liste kutusuna istediğiniz arama sonuçları geldikten sonra bu butonu tıklayıp Excel dosyası formatında istediğiniz yere istediğiniz isimde kaydedin.
İyi çalışmalar