从access导出数据到excel的问题

kangking

谢谢楼上的朋友!
你可能没有command dialog控件,要先安装这个控件再加上引用才行的.

andymark

这种问题曾经遇到过，第一次导出OK，第二次就出错
最终还是用结束进程的方法解决

静儿

我打开程序也提示没有装控件，没法运行。我又看不懂里面长长的代码。
我就说说我这里是怎么做的吧。
在excel中做两个文件，
一个文件是excel显示所需要的数据文件，而格式是象数据库一样的；
另一个文件是框架文件，即做好页面的抬头，定义好数据的格式，列宽等等，数据单元格是链接到第一个excel文件的。
然后在acc中将表或查询的数据导出到第一个excel中，然后再用代码打开第二个excel文件就ok了。

kangking

谢谢静儿!你说的无疑是一个好的办法,也省了在代码中写一大堆格式单元格的代码.
但是我想还是有些问题,我要的文件是每天一个的,且不说记录数量可能变,单是在导出之前复制一个新的模板也是一件头疼的事(当然可以用代码进行复制).
总之,你的意见很好,在我实在没有办法解决这个问题的时候,我会采用你的方法的.
再次谢谢!

sgrshh29

原帖由 kangking 于 2007-10-25 09:57 发表
我要的文件是每天一个的,且不说记录数量可能变,单是在导出之前复制一个新的模板也是一件头疼的事(当然可以用代码 ...

如果你每天都有这么固定格式的过程,建议你还是采用access导出到－xlt模板（模板中用代码设置格式）－另存为指定名称的xls文件，这样比较合理。access中代码也比较少，也不会有格式不到位的问题。 只要做一次xlt的模板就行了。

Grant

呵呵,问题解决了,是异常退出后造成无法正常结束进程
逐步帮你调试找到问题所在查收吧
有空多来提问学习交流

kangking

原帖由 Grant 于 2007-10-25 11:38 发表
呵呵,问题解决了,是异常退出后造成无法正常结束进程
逐步帮你调试找到问题所在查收吧
有空多来提问学习交流

谢谢!
我已经下载,马上看看.
谢谢!

kangking

原帖由 sgrshh29 于 2007-10-25 11:10 发表


如果你每天都有这么固定格式的过程,建议你还是采用access导出到－xlt模板（模板中用代码设置格式）－另存为指定名称的xls文件，这样比较合理。access中代码也比较少，也不会有格式不到位的问题。 只要做一次xlt的 ...

谢谢!你说的也不失为一个好的方法.虽然我没有做过,我会尝试一下的.谢谢!

kangking

原帖由 Grant 于 2007-10-25 11:38 发表
呵呵,问题解决了,是异常退出后造成无法正常结束进程
逐步帮你调试找到问题所在查收吧
有空多来提问学习交流

认真看了你的示例,只发现下面的句子改了:
    ExcelBook.Close  SaveChanges:=False
但是这样做的结果是文件没有保存,于是我又改回来:
    ExcelBook.Close True, SaveAsFileName
文件就可以保存了.

现在令我一头雾水的是:无论是按你的句子运行还是按我改了后的句子运行都是正确的,多次的导出结果都正确.但是在我的文件中无论是设置为false 还是 true 都是只能第一次正确,后面的都不正确.

请问除了我发现的改动,还有没有其它的地方做了改动?(你可能用的是office 11,总不至于在11版用过以后再在10版上才能正确运行吧?)

再请版主解我心头之结,谢谢!

Grant

ExcelBook.Close  SaveChanges:=False这里是我忘记更改回来了~
证明你还是没有认真查看不对的地方
Selection 的前面都加了ExcelApp 对象
ExcelApp.Selection 这样子全部都改了