Vba 使用exit语句停止宏操作

嗨，我打算在保存完成后弹出文件位置文件夹。我的问题是当我取消保存时。文件夹也会弹出。如何在单击“取消保存”时停止文件夹弹出窗口。如果我没弄错的话，可以通过退出声明来完成

这是我的密码

Private Sub savebr_Click()


Dim varResult As Variant
Dim saveas As String
Dim fname As String


Cells.AutoFilter
'to get original filename put below code

 fname = ActiveWorkbook.Name

 saveas = "C:/newfolder.Show fname


'to open targeted folder after save

Call Shell("explorer.exe" & " " & ActiveWorkbook.path, vbNormalFocus)




End Sub

---

打开vbe窗口。转到此工作簿

Private Sub Workbook_AfterSave(ByVal Success As Boolean)
    If (Success) Then
        Call Shell("explorer.exe" & " " & ActiveWorkbook.Path, vbNormalFocus)
    End If
End Sub

使用常规保存方法保存文件夹后，此宏将打开该文件夹

---

**当用户取消保存时更新。

是更正代码将在保存完成后打开文件夹。问题是当我取消保存时。文件夹也将打开。我不想它打开时，点击取消不知道你是否意识到我更新了，但上面的代码应该可以解决你的问题。