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 :

Code évènementiel dans module


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
    Inscrit en
    Mai 2012
    Messages
    1 150
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mai 2012
    Messages : 1 150
    Par défaut Code évènementiel dans module
    Bonjour,
    J'ai un code évènementiel double clic dans un feuille d'un classeur, je copie cette feuille chaque jour pour le jour suivant ce qui fini par rendre le fichier trop lourd.

    Je me demande si je peux passer ce code dans un module appelé dans une évènementielle dans le code de la feuille.

    Le code de la feuille serait, en gros:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
     
    LastLig = Range("A500000").End(xlUp).Row
     
        If Target.Column = 1 And Target.Row <= LastLig And Cells(Target.Row, 1) <> "" Then
     
     
        EVNMTL
     
        End If
     
    End Sub

    Mais quid des target.row ou .column qui seraient maintenant dans le module mais qui ne ferait référence à rien du tout si je ne m'abuse dois-je tout remplacer avec des activecell.row ou .column... ou existe-t-il y un moyen de récupérer tout ce qui est target en argument de l'évènementiel ou tout autre moyen?

    MERCI BEAUCOUP D'AVANCE DU COUP DE MAIN.

  2. #2
    Membre Expert Avatar de Nain porte koi
    Homme Profil pro
    peu importe
    Inscrit en
    Novembre 2023
    Messages
    1 176
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : peu importe

    Informations forums :
    Inscription : Novembre 2023
    Messages : 1 176
    Par défaut
    Hello,

    pas sur du tout d'avoir tout compris, mais si au lieu de Worksheet_BeforeDoubleClick qui est donc dans une feuille, vous utilisiez Workbook_SheetBeforeDoubleClick donc dans le module ThisWorkBook ?

  3. #3
    Membre éprouvé
    Homme Profil pro
    Inscrit en
    Mai 2012
    Messages
    1 150
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mai 2012
    Messages : 1 150
    Par défaut
    En effet, je n'avais pas pensé à cette approche!!!

  4. #4
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 168
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 168
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Je n'ai pas compris la question.
    En général on place l'instruction Cancel = True à l'intérieur de la structure décisionnelle ici If Target.Column = 1 And Target.Row <= LastLig And Cells(Target.Row, 1) <> "" Then et ce pour éviter d'entrer en édition de la cellule (Target)

    A lire éventuellement pour en savoir plus sur les procédures événementielles
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

Discussions similaires

  1. [XL-2019] VBA : code fonctionne dans module mais pas dans Feuilles (Userform)
    Par Thomas88-67 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 03/12/2020, 16h37
  2. [XL-2007] Adapter petit code dans module de classe
    Par eliot.raymond dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 15/11/2012, 15h13
  3. inclure du code HTML dans le module
    Par riadhhwajdii dans le forum GWT et Vaadin
    Réponses: 3
    Dernier message: 22/03/2010, 19h23
  4. placer un code dans module
    Par nicolovitch dans le forum Access
    Réponses: 2
    Dernier message: 22/09/2006, 10h56
  5. Rassembler un code evenement dans un module ou autre
    Par Alpha31 dans le forum Access
    Réponses: 2
    Dernier message: 03/06/2006, 20h23

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