代码如下
怎么实现如果网页出现问题，或者需要临时停止，按下停止键之后，先执行Call Plugin.Office.CloseXls//关闭EXCEL，关闭ECEL保存进度，然后再停止脚本。
Sub 读取（）
Call Plugin.Office.OpenXls("D:\11\工单回复2020-3-17.xlsx")//打开打开EXCEL
i = 2
Do
Text1 = Plugin.Office.ReadXls(1, i, 1)// 读取文件内容(sheet,行，列)=工单号 赋值给变量Text1
If Text1 = "" Then
Delay 300
Call Plugin.Office.CloseXls//关闭EXCEL
Delay 300
UnlockMouse //解除鼠标锁定
Delay 300
MessageBox "已全部完成"
Exit Do
Else
Text4 = Plugin.Office.ReadXls(1, i, 4)// 读取文件内容(sheet,行，列)
If Text4 <> "已完成" Then
Text2 = Plugin.Office.ReadXls(1, i, 2)// 读取文件内容(sheet,行，列)=现场情况+措施落实 赋值给变量Text2
Call 点单（）
Delay 300
Call Plugin.Office.WriteXls(1, i, 4, "已完成")
Delay 300
i = i + 1
Else
i = i + 1
End If
End If
Loop
End Sub