我编写了一个电子表格来保存,并始终替换公司网络上某个位置的原始文件。但由于Wi-Fi有时会崩溃,Excel无法保存到指定位置,并最终返回错误图像。有没有可能隐藏这个错误并继续前进?x1c 0d1x(翻译:Bing Translate)
Application.DisplayAlerts = False
字符串还有
Application.EnableEvents = False
型不工作。
nzkunb0c1#
如果您预期某个语句可能会失败,您可以通过设置On Error Resume Next来自己捕获错误-但不要忘记将语句On Error Goto 0放在该语句之后。当然,如果保存失败,工作簿仍然不安全,你需要照顾它。您可以使用Saved属性检查工作簿在上次(成功)保存后是否被修改。
On Error Resume Next
On Error Goto 0
Saved
On Error Resume NextThisWorkbook.SaveAs "X:\junk", FileFormat:=xlOpenXMLWorkbookMacroEnabled' Debug.Print Err.Number, Err.Description ' It's a 1004 errorOn Error GoTo 0if not ThisWorkbook.Saved then msgBox "Failed to save workbook."
ThisWorkbook.SaveAs "X:\junk", FileFormat:=xlOpenXMLWorkbookMacroEnabled
' Debug.Print Err.Number, Err.Description ' It's a 1004 error
On Error GoTo 0
if not ThisWorkbook.Saved then msgBox "Failed to save workbook."
字符串
1条答案
按热度按时间nzkunb0c1#
如果您预期某个语句可能会失败,您可以通过设置
On Error Resume Next
来自己捕获错误-但不要忘记将语句On Error Goto 0
放在该语句之后。当然,如果保存失败,工作簿仍然不安全,你需要照顾它。您可以使用
Saved
属性检查工作簿在上次(成功)保存后是否被修改。字符串