Arrêt de la macro à partir de l'instruction de sortie

Question

hi Je vais faire apparaître le dossier de localisation du fichier une fois la sauvegarde terminée. mon problème est quand j'annule la sauvegarde. le dossier popup aussi. comment arrêter le popup de dossier quand je clique sur annuler la sauvegarde. Si je ne suis pas trompé, il peut être fait par une déclaration de sortie

ici mon code

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 

Answer 1

Ouvrez la fenêtre de votre VBE. aller à ThisWorkbook.

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

Cette macro ouvrira le dossier après l'avoir sauvegardé en utilisant les méthodes de sauvegarde normales.

** Mis à jour lorsque l'utilisateur a annulé l'enregistrement.