|
4#
楼主 |
发表于 2005-4-12 21:50:00
|
只看该作者
.ant的默认打开方法我就是设为EXCELL的,但修改后保存时出了好几个提示窗口,如何在程序里回应这些窗口?(前提是格式还是原来的)
以下是我尝试关掉它的方法之一,结果都不如意,请指点。
ActiveWorkbook.SaveAs Filename:= _ '将它另存为FileNames(I) & 3
FILEPATH & "\" & FileNames(I) & 3, FileFormat _
:=xlDBF4 ', CreateBackup:=False,
ActiveWindow.Close SaveChanges:=True, Filename:= _ '关闭时有提示窗口,不知怎么关
FILEPATH & "\" & FileNames(I) & 3
Kill FILEPATH & "\" & FileNames(I) '删除原文件
Name FILEPATH & "\" & FileNames(I) & 3 As FILEPATH & "\" & FileNames(I) |
|