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

Macros et VBA Excel Discussion :

ne pas exécuter tout Private Sub Workbook_Open() à l'open [XL-2016]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    Juillet 2017
    Messages
    1 291
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 74
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Juillet 2017
    Messages : 1 291
    Par défaut ne pas exécuter tout Private Sub Workbook_Open() à l'open
    Bonjour,

    à l'open d'un classeur "C" je fais un certain traitement "T" qui prends du temps, ce classeur peut être ouvert par d'autres classeurs mais sans besoin du traitement "T".

    Pour optimiser je me demande si je peux ouvrir ce classeur "C" en passant un paramètre et tester ce paramètre dans Private Sub Workbook_Open() pour sauter le traitement "T"

    Suis-je assez clair dans ma demande ?

    merci pour toutes bonnes idées ou pratiques

  2. #2
    Expert confirmé
    Avatar de MarcelG
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2009
    Messages
    3 449
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Maine et Loire (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2009
    Messages : 3 449
    Billets dans le blog
    7
    Par défaut
    Salut Retraite,

    A mon sens, lors de l'appel du classeur ayant la procédure Open, l'instruction
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.EnableEvents = False
    suffirait dans la procédure d'appel.

    Si une partie de l'évènement Open seule est à exécuter, alors la procédure Open de ce classeur pourrait contenir une suite d'appels de procédure.
    Celle(s) choisie(s) serai(en)t exécutée(s) à partir de l'instruction
    dans le classeur appelant.

  3. #3
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    Juillet 2017
    Messages
    1 291
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 74
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Juillet 2017
    Messages : 1 291
    Par défaut
    Merci

    qu'entend-on par
    la procédure Open
    je ne comprends pas si c'est dans le classeur appelant ou le classeur ayant "private sub woorkbook_open"

    de toutes façons je vais tester

  4. #4
    Expert confirmé
    Avatar de MarcelG
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2009
    Messages
    3 449
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Maine et Loire (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2009
    Messages : 3 449
    Billets dans le blog
    7
    Par défaut
    J'entendais par là la procédure évènementielle
    Workbook_Open
    .

  5. #5
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    Juillet 2017
    Messages
    1 291
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 74
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Juillet 2017
    Messages : 1 291
    Par défaut
    je ne comprends pas bien comment ça s'articule avec "Workbook_Open" , je n'ai jamais fait cela mais je vais chercher…

    merci

  6. #6
    Expert confirmé
    Avatar de MarcelG
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2009
    Messages
    3 449
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Maine et Loire (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2009
    Messages : 3 449
    Billets dans le blog
    7
    Par défaut
    A toute fin utile,
    Sur Application.Run à partir d'un classeur autre, voir cette passionnante discussion à laquelle ont participé le regretté Ouskelnor (ma jeunesse sur le Forum), Silkyraod et Jean Philippe André

  7. #7
    Rédacteur/Modérateur


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    Novembre 2003
    Messages
    19 125
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : Novembre 2003
    Messages : 19 125
    Billets dans le blog
    131
    Par défaut
    Salut.

    A la place de Workbook_Open, tu peux utiliser Auto_Open (à placer dans un module standard).

    - Workbook_Open s'exécute AVANT Auto_Open;
    - Auto_Open ne s'exécute pas si le classeur est ouvert par macro.
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

  8. #8
    Rédacteur/Modérateur


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    Novembre 2003
    Messages
    19 125
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : Novembre 2003
    Messages : 19 125
    Billets dans le blog
    131
    Par défaut
    Je mets ici deux fichiers: Launcher et Auto_Open

    Place-les dans un même dossier puis observe ce qui se passe:

    1. Ouvre Auto_Open.xslm => Tu verras que les trois tris sont réalisés dans l'ordre 1, 2, 3.

    2. Ferme Auto_Open, puis ouvre Launcher.xslm. Clique sur le bouton pour ouvrir Auto_Open.xlsm. Tu verras que seuls les tris 1 et 2 sont réalisés.


    => Les procédures qui ne doivent pas être exécutées lors d'une ouverture par macro doivent donc être appelées par Auto_Open. En cas d'ouverture manuelle, les procédures appelées par Auto_Open seront appelées après celles appelées par Workbook_Open.
    Fichiers attachés Fichiers attachés
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

  9. #9
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    Juillet 2017
    Messages
    1 291
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 74
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Juillet 2017
    Messages : 1 291
    Par défaut
    GRAND MERCI c'est très clair et j'ignorai cela, comme beaucoup surement, très instructif

    Je vais revoir ensuite mes classeurs pour tenir de ta remarque aussi (pas de code direct dans le code applicatif dans mes Workbook_Open)

    Une question :

    comment faire pour que tri1 et tri2 soient appelés à l'ouverture du fichier lorsque l'open est fait par une macro dans un classeur A et qu'aucun des 2 tris ne soient faits à l'ouverture du fichier lorsque l'open est fait par une macro dans un classeur B

  10. #10
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 374
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 374
    Billets dans le blog
    8
    Par défaut re
    re
    bonjour retraité

    comment faire pour que tri1 et tri2 soient appelés à l'ouverture du fichier lorsque l'open est fait par une macro dans un classeur A et qu'aucun des 2 tris ne soient faits à l'ouverture du fichier lorsque l'open est fait par une macro dans un classeur B

    on retombe dans ce qui a été dit avant a savoir :qu'il faut pointer d'une manière ou d'une autre dans le fichier auto_open le fichier qu'il la lancé

    dans ce cas là la solution du bath qui t'a été donné est toute indiquée ...ou... pointer sur la caption le nom du launcher comme je te l'ai indiqué



    moi aussi je l'ignorais complètement ce "sub auto_open "
    mes fichiers dans les contributions:
    mail avec CDO en vba et mail avec CDO en vbs dans un HTA
    survol des bouton dans userform
    prendre un cliché d'un range

    si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
    et n'oublie pas de voter

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

Discussions similaires

  1. replace() sur toutes les variables d'une Private Sub
    Par wulfram dans le forum VBA Access
    Réponses: 2
    Dernier message: 07/08/2016, 15h48
  2. [XL-2007] Listview et auto exécution private sub lorsque changement de ligne
    Par chrisaccess dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 06/01/2016, 20h23
  3. VBS ne pas exécuter le Workbook_Open()
    Par GuiJenn34 dans le forum VBScript
    Réponses: 1
    Dernier message: 25/09/2015, 09h01
  4. Réponses: 3
    Dernier message: 30/03/2015, 11h48
  5. [XL-2010] Supprimer une ligne précise dans Thisworkbook Private Sub Workbook_Open
    Par modus57 dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 24/04/2012, 19h31

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