只需一步,快速开始
使用道具 举报
窗体里加一个按纽,写入以下代码(稍作修改即可): Private Sub Command0_Click() DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "temp", "c:\temp.xls", yes End Sub RickyZjw-3721 发表于 2009-6-16 21:36
本版积分规则 发表回复 回帖后跳转到最后一页
|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )
GMT+8, 2024-11-15 18:23 , Processed in 0.085789 second(s), 28 queries .
Powered by Discuz! X3.3
© 2001-2017 Comsenz Inc.