IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Excel Discussion :

Comment executer une macro "Save" à chaque fois que la touche Enter est activée? [XL-2010]


Sujet :

Excel

  1. #1
    Candidat au Club
    Homme Profil pro
    Responsable marketing opérationnel
    Inscrit en
    Septembre 2014
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 59
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Responsable marketing opérationnel
    Secteur : Industrie

    Informations forums :
    Inscription : Septembre 2014
    Messages : 3
    Points : 4
    Points
    4
    Par défaut Comment executer une macro "Save" à chaque fois que la touche Enter est activée?
    Bonjour,

    J'ai besoin de m'assurer que les utilisateurs qui vont mettre à jour quelques cellules d'une feuille Excel sauvegardent bien leur saisie (l'expérience montre qu'il n'en est rien).

    Je voudrais par conséquent qu'une macro sauvegarde automatiquement après chaque pression sur la touche Enter, quelque soit la feuille utilisée.

    Merci de votre aide

  2. #2
    Invité
    Invité(e)
    Par défaut
    Salut,

    A mettre dans le Module 'ThisWorkbook'.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Private Sub Workbook_AfterSave(ByVal Success As Boolean)
        Macro1
    End Sub
    'Macro1' est la Macro en question qui doit être exécuté.

  3. #3
    Expert éminent sénior
    Homme Profil pro
    aucune
    Inscrit en
    Septembre 2011
    Messages
    8 207
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Septembre 2011
    Messages : 8 207
    Points : 14 362
    Points
    14 362
    Par défaut
    Bonjour,

    Mets dans le module ThisWorkbook (mais ça risque d'être lourd) :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
        ThisWorkbook.Save
    End Sub

  4. #4
    Candidat au Club
    Homme Profil pro
    Responsable marketing opérationnel
    Inscrit en
    Septembre 2014
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 59
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Responsable marketing opérationnel
    Secteur : Industrie

    Informations forums :
    Inscription : Septembre 2014
    Messages : 3
    Points : 4
    Points
    4
    Par défaut merci! ça marche!
    Citation Envoyé par Daniel.C Voir le message
    Bonjour,

    Mets dans le module ThisWorkbook (mais ça risque d'être lourd) :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
        ThisWorkbook.Save
    End Sub

  5. #5
    Invité
    Invité(e)
    Par défaut
    Oups. Je n'avais pas compris.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [AC-2003] Comment executer une macro Excel sous Access
    Par Deustalos dans le forum VBA Access
    Réponses: 6
    Dernier message: 04/11/2009, 12h30
  2. comment executer une macro excel depuis page asp ?
    Par auboulot909 dans le forum ASP
    Réponses: 12
    Dernier message: 10/01/2008, 19h26
  3. Réponses: 12
    Dernier message: 01/03/2007, 11h07
  4. comment executer une macro?$
    Par khaliloum dans le forum IHM
    Réponses: 1
    Dernier message: 11/06/2006, 16h41

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo