Auto_close et enregistrer sous

patrick -  
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour,
J'ai réalisé une procédure Auto_close dans mon fichier Excel 2003 qui fonctionne à la commande "Enregistrer", mais qui ne tourne avec la commande "Enregistrer sous".
Y a-t-il une fonction spéciale ?
merci

2 réponses

  1.
    lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    Bonjour,
    Difficile d'avoir une idée du problème sans avoir ta macro.
    Met la dans un poste suivant.
    A+
    0
    1. patrick
       
      La macro vérifie si une cellule contenant initialement "***" a été correctement complétée :
      sub auto_close()
      if range("A1")="***" then range("A1")="?" : alert=1
      if alert=1 then MsgBox "ATTENTION : voir le ?"
      end sub
      Si je fais "enregistrer" ou "enregistrer sous" la macro ne s'exécute pas.
      Par contre, si je fais "fermer", elle s'exécute.
      Je voudrais qu'elle s'exécute pour "enregistrer sous" principalement, car le fichier est un modèle que l'utilisateur doit enregistrer lui-même, sans modifier l'original.
      merci
      0
  2. lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    La commande Sauve ou Sauve sous.. ne ferme pas le classeur
    Tu doit mettre un
    Application.Quit après.
    A+
    0