【求助】请教高手们，关于导出到EXCEL时将已有文件拷贝的问题

lovehere

在论坛里学习了ACCESS导出到EXCEL的内容，实际使用中发现有个需要求助这里的高手们。
我现在需要每月导出一个EXCEL表。但每次导出的时候都需要手工把上次导入的内容删掉，现在想知道，有没有可能这样做，我做好一个现成的表格文件放到当前目录下做模板，导入时，先将此文件拷贝为另一个名称后在做导入？这样就不用每次都手工清空EXCEL文件了。

todaynew

........
........
xlBook.SaveAs CurrentProject.Path & "\" & Month(Date) & "月初销售计划.xls"
xlBook.Close
xlApp.Quit
Set xlApp = Nothing
Set xlBook = Nothing
........
.......

lovehere

简直太牛了，连月份都给加上了，感激不尽啊！！！

todaynew

简直太牛了，连月份都给加上了，感激不尽啊！！！
lovehere 发表于 2010-8-11 16:45

以下方法也行：
........
Dim filname As String
filname = CurrentProject.Path & "\" & Month(Date) & "月初销售计划.xls"
FileCopy CurrentProject.Path & "\月初销售计划.xls", filname
xlApp.Application.Visible = True
Set xlBook = xlApp.Workbooks.Open(filname)
......
......
xlBook.Save
xlBook.Close
xlApp.Quit
Set xlApp = Nothing
Set xlBook = Nothing
......


及采取先复制的方法，和上面另存为的方法不同。

lovehere

再次感谢todaynew 的无私帮助！！！！