看到网上的一些导出例子是用 复制拷贝 的方法 把子窗体内容导出,在记录多的时候就很慢 下面是我结合从网上找到的一些资料和查自带帮助 写下的,希望给大家带来方便 Private Sub ImportToExcel() Dim oExcel As Object oBook.Worksheets(1).Range("A2").CopyFromRecordset Me.子窗体.Form.Recordset errexit: errit: End Sub |
|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )
GMT+8, 2024-4-27 23:23 , Processed in 0.061427 second(s), 16 queries .
Powered by Discuz! X3.3
© 2001-2017 Comsenz Inc.