在下面的代码基础上,判断,原先是否有相同文件,如果有
则,在名字后面加上序号
例如
如果原先存在 导入格式。xls
新生成的文件为 导入格式-1.xls
如果两个都有的话,导入格式-2。xls
以此类推。。
Book.Save("d:\pic1\" & Date.Today & "\" & "导入格式.xls")