Office中国论坛/Access中国论坛

标题: 急，在线等 [打印本页]

作者: htcwy 时间: 2005-11-30 03:06
标题: 急，在线等
如果需要excel在保存时能够自动保存到另一个地方作为副本，我们可以在before save中加入：
thisworkbook.savecopyas "D:\123.xls"
　现在的问题是，如果源文件叫 aaa.xls ,怎么样才能保存时在D盘也保存为：aaa.xls，　
请指教，急用，在线等

作者: tanjh 时间: 2005-12-3 17:39
sub BtnSave()

thisworkbook.save

filecopy thisworkbook.path & "\aaa.xls",""D:\123.xls"

end sub

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)