excele aktar
Konuda aynı zamanda DoCmd.TransferSpreadsheet komutu ile direkt sorguyu kısayoldan excel'e aktarmanın örneği de var.
Kod:
Dim DOSYAADI As String
DOSYAADI = CurrentProject.Path & "\SONUÇLAR.xls"
DoCmd.TransferSpreadsheet acExport, 8, "SORGUADI", DOSYAADI, True