请教如何在窗体上通过VBA把表导出到已有的excel文件？

smilingkiss

如题，我想通过VBA实现把已有表的数据导出到已经存在的excel文件上（例如11.xls，导出的数据自动在11.xls上新建一个工作表），请教各位大神，如方便，请在附件示例中帮忙修改，谢谢！

access学习交流

导出Excel通用函数   http://www.office-cn.net/forum.php?mod=viewthread&tid=93445  
请参考！

smilingkiss

access学习交流 发表于 2013-11-1 10:32
导出Excel通用函数   http://www.office-cn.net/forum.php?mod=viewthread&tid=93445  
请参考！

另想请教：如果我想导出的excel文件已经存在，如何让导出数据自动导出到该excel文件的一个新建工作表呢？

roych

默认情况下，如果指定文件名的话，导出来就是在那个Excel文件里，而工作表则需要另行命名【否则就会覆盖原表】。

smilingkiss

roych 发表于 2013-11-3 00:03
默认情况下，如果指定文件名的话，导出来就是在那个Excel文件里，而工作表则需要另行命名【否则就会覆盖原 ...

版主，谢谢你的帮助，经过琢磨各位高人的指点和例子，已经解决了一些问题，
另外，版主，我在这里上传了附件，里面窗体1的“导出数据”按钮，第一次打开窗体执行没问题，如果不关闭窗体的情况下再执行，导出的excel文件就只有标题栏了，只有把窗体关闭了重新打开才可以正常执行了，这是为什么呢？

roych

查找文件那个模块有问题，应该设置默认值。否则，一旦未选定（例如之前不曾有过这个文件，那就必须要新建一个文件）就无法导出了。

smilingkiss

roych 发表于 2013-11-10 19:08
查找文件那个模块有问题，应该设置默认值。否则，一旦未选定（例如之前不曾有过这个文件，那就必须要新建一 ...

谢谢啊roych版主，这个问题我已经解决了，是模块函数那里的问题，导出前，把rst指针放到第一条记录就行了，之前的问题，实际是第一次导出的时候，rst已经到了last了再执行的时候没有返回到第一条，所以就没有数据导出了，再次谢谢！