我需要什么样的语句来检查vba中的SaveAs操作是否成功?
Sub saveBookAs()
wb.SaveAs fileName:="newFile"
End Sub
您不需要语句来检查工作簿是否已保存:) 如果Save As
进程失败,那么该行将自动出错:)
话虽如此,如果你想检查文件是否存在,你可以随时使用DIR
功能。DIR
返回一个字符串,表示与指定模式或文件属性或驱动器卷标匹配的文件、目录或文件夹的名称。
Syntax
目录[(路径名[属性])]
查看 VBA 帮助以获取更多详细信息。
EDIT
另一个提示。
如果您不希望代码被破坏,那么您还可以使用适当的错误处理。
例如
Sub Sample()
On Error GoTo Whoa
ActiveWorkbook.Save SomeFilePathAndName
Exit Sub
Whoa:
MsgBox Err.Description
End Sub
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)