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