Access Tabloyu Excele Aktarma

Merhaba Exceldeki tabloları toplu olarak tek Excel dosyasında tabloları sayfa olarak excele aktarmak istiyorum örnek form çalışması aşağıda acces dosyasını seçtikten sonra excele aktarma butonu eklemek istiyorum nasıl yapabiliriz

Merhaba
formumuzda arama yaptınızmı çok örneğimiz var lütfen arama motorunu kullanın örnekler bulacaksınız

inceleyiniz,

DoCmd.TransferDatabase acImport, "Microsoft Access", [Metin8], acTable, "Analiz", "Analiz", False

DoCmd.TransferSpreadsheet acExport, 10, "Analiz", "Analiz", True, ""

DoCmd.DeleteObject acTable, "Analiz"

MsgBox ("Analiz Tablosu Aktarıldı")

DoCmd.TransferDatabase acImport, "Microsoft Access", [Metin8], acTable, "Dersler", "Dersler", False

DoCmd.TransferSpreadsheet acExport, 10, "Dersler", "Dersler", True, ""

DoCmd.DeleteObject acTable, "Dersler"

MsgBox ("Dersler Tablosu Aktarıldı")

DoCmd.TransferDatabase acImport, "Microsoft Access", [Metin8], acTable, "Konular", "Konular", False

DoCmd.TransferSpreadsheet acExport, 10, "Konular", "Konular", True, ""

DoCmd.DeleteObject acTable, "Konular"

MsgBox ("Konular Tablosu Aktarıldı")

DoCmd.TransferDatabase acImport, "Microsoft Access", [Metin8], acTable, "Notlar", "Notlar", False

DoCmd.TransferSpreadsheet acExport, 10, "Notlar", "Notlar", True, ""

DoCmd.DeleteObject acTable, "Notlar"

MsgBox ("Notlar Tablosu Aktarıldı")

Sn ikurt probleminizi çözebildiniz mi? Lütfen geri bildirimde bulununuz.
Saygılar...

evet teşekkürler