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 :

Utilisation "Worksheet_SelectionChange(ByVal target As Range)"


Sujet :

Macros et VBA Excel

  1. #1
    Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Octobre 2013
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Industrie

    Informations forums :
    Inscription : Octobre 2013
    Messages : 2
    Par défaut Utilisation "Worksheet_SelectionChange(ByVal target As Range)"
    Bonjour a tous,

    c'est mon premier post sur ce forum qui m'a déjà bien aidé

    Je viens vous demander de l'aide au sujet d'une de mes macro VBA.

    Je souhaiterais qu'à chaque fois que j’écris une valeur dans une case, la macro lance une autre macro qui me utiliserais ladite valeur...

    J'utilise le code suivant: (j'ai changé ici ma seconde macro par une ligne de code simple, par souci de simplicité)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
              Sub Worksheet_SelectionChange(ByVal target As Range)
     
              If Not Intersect(target, Range("x4:ds204")) Is Nothing Then
                       ligne = target.Row '(ligne) étant une variable Public qui me servira dans mon autre macro
                       Cells(ligne, 21) = target.Value
              End If
     
              End Sub
    Le problème, c'est que le code fonctionne avec l'ancienne valeur de ma case Target, et moi je voudrais que le code fonctionne avec la valeur que je rentre.
    Est ce qu'il existe un moyen ou pas ?

    Merci d'avance

  2. #2
    Expert confirmé
    Homme Profil pro
    Electrotechnicien
    Inscrit en
    Juillet 2016
    Messages
    3 241
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 71
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Electrotechnicien

    Informations forums :
    Inscription : Juillet 2016
    Messages : 3 241
    Par défaut
    Bonjour,

    Ceci
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Sub Worksheet_Change(ByVal target As Range)
    à la place de cela
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Sub Worksheet_SelectionChange(ByVal target As Range)
    Cdlt

Discussions similaires

  1. Réponses: 10
    Dernier message: 22/03/2016, 22h58
  2. [XL-2007] petit soucis avec un Private Sub Worksheet_Change(ByVal Target As Range)
    Par dris974 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 28/03/2011, 12h57
  3. [XL-2000] Enigme Worksheet_SelectionChange(ByVal Target As Range)
    Par Invité(e) dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 06/01/2010, 08h32
  4. SelectionChange(ByVal Target As Range)
    Par newsinfos dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 21/11/2007, 11h00
  5. [VBA-E]evènement Change(ByVal Target As Range) et DDE
    Par potili2 dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 13/03/2007, 16h26

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