在ACCESS中,使用VBA导出表成excel文件时,如何保留格式和布局
代码如下:DoCmd.TransferSpreadsheetacExport,8,"测试"&Text0&"","D:\MAPINFO\TAB\测试.xls",False,...
代码如下:DoCmd.TransferSpreadsheet acExport, 8, "测试" & Text0 & "", "D:\MAPINFO\TAB\测试.xls", False, ""
我自己已解决,提供答案给需要的朋友.上面的代码无法实现,只有下面的才能实现,因为那个是另存,这个是导出.
DoCmd.OutputTo acOutputTable, "rfcon", acFormatXLS, "D:\MAPINFO\TAB\RFcon.xls", False 展开
我自己已解决,提供答案给需要的朋友.上面的代码无法实现,只有下面的才能实现,因为那个是另存,这个是导出.
DoCmd.OutputTo acOutputTable, "rfcon", acFormatXLS, "D:\MAPINFO\TAB\RFcon.xls", False 展开
2个回答
展开全部
很不幸地告诉你(坚强点,别太伤心),Excel本身没有导出成mdb的能力,Excel中根本就没包含这类的VBA语句,和你思路不一样的是,我们在处理这类问题时的一般办法是:
1、用access建立一个名为“Sheet.mdb”的数据库,里面只有一个GENERALDATA的空表 (这个只需要做一次,以后就再不需要做了)
2、在Excel中通过VBA程序的ADO方式连接到 Sheet.mdb,根据Excel表自身的数据,通过SQL修改Shet.mdb里面的GENERALDATA表结构,然后再把数据更新进去,然后关闭sheet.mdb
3、通过Excel的Shell方式(也有其他方式)来复制sheet.mdb为与工作表名相同的文件(后缀仍为mdb)
由于这个操作可能要对不同的工作薄和工作表进行,所以这个VBA我们用加载宏的方式来开发它。
好了,写这个东西工作量可不小,所以我就不具体给你写了,但愿所提供的思路能对你有启发。
1、用access建立一个名为“Sheet.mdb”的数据库,里面只有一个GENERALDATA的空表 (这个只需要做一次,以后就再不需要做了)
2、在Excel中通过VBA程序的ADO方式连接到 Sheet.mdb,根据Excel表自身的数据,通过SQL修改Shet.mdb里面的GENERALDATA表结构,然后再把数据更新进去,然后关闭sheet.mdb
3、通过Excel的Shell方式(也有其他方式)来复制sheet.mdb为与工作表名相同的文件(后缀仍为mdb)
由于这个操作可能要对不同的工作薄和工作表进行,所以这个VBA我们用加载宏的方式来开发它。
好了,写这个东西工作量可不小,所以我就不具体给你写了,但愿所提供的思路能对你有启发。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |