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 :

selection menu deroulant + macro [XL-2003]


Sujet :

Macros et VBA Excel

  1. #1
    Membre éclairé

    Homme Profil pro
    Restaurateur
    Inscrit en
    Juin 2008
    Messages
    316
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Restaurateur
    Secteur : Alimentation

    Informations forums :
    Inscription : Juin 2008
    Messages : 316
    Billets dans le blog
    1
    Par défaut selection menu deroulant + macro
    Bonjour,
    j'ai un menu deroulant qui, en fonction du choix fait, va alimenter le resultat d'une macro par un clic (sur le bouton de la macro, biensur)

    je voudrais, puisque cette tache est systematique,
    declancher automatiquement, apres le choix du menu déroulant, la macro qui est toujours la même.

    je ne peux pas affecter sur un menu déroulant de macro...
    mais il doit bien y avoir une manip qui existe tout de même

    Merci d'avance !

  2. #2
    Membre expérimenté
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    226
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Avril 2008
    Messages : 226
    Par défaut
    Hello,

    Pas sur d'avoir compris, mais vois le fichier joint.

    Si tu veux pas ouvrir le fichier (ce que je peux comprendre), procède comme suit.

    Supposons que tu as une liste en A1 avec trois choix "A", "B" ou "C".

    Dans le code de la feuille tu mets ceci...
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    Private Sub Worksheet_Change(ByVal Target As Range)
     
        'A chaque changement sur la cellule A1
        If Not Application.Intersect(Target, [A1]) Is Nothing Then
            If Target = "A" Then
                MsgBox "A"
            ElseIf Target = "B" Then
                MsgBox "B"
            ElseIf Target = "C" Then
                MsgBox "C"
            Else
                Exit Sub
            End If
        End If
     
    End Sub
    En espérant t'avoir aidé.

    Cdt, Antoniom.
    Fichiers attachés Fichiers attachés

  3. #3
    Membre éclairé

    Homme Profil pro
    Restaurateur
    Inscrit en
    Juin 2008
    Messages
    316
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Restaurateur
    Secteur : Alimentation

    Informations forums :
    Inscription : Juin 2008
    Messages : 316
    Billets dans le blog
    1
    Par défaut
    Merci, mais je n'y arrive pas... c'est l'idée en tout cas...
    voilà mon code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub Worksheet_Change(ByVal Target As Range)
     
        If Not Application.Intersect(Target, [C16]) Is Nothing Then
                DISPATCHGXP
     
        End If
     
    End Sub
    et je veux dire qu'a chaque changement de la cellule c16, je déclenche la macro DISPATCHGXP
    et comme ça ca ne passe pas..???

  4. #4
    Membre expérimenté
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    226
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Avril 2008
    Messages : 226
    Par défaut
    Hello,

    Je ne sais quoi te dire, chez moi ça joue. Je précise que je travaille avec Office 2003.

    Bonne fin de journée.

    Antoniom.
    Fichiers attachés Fichiers attachés

  5. #5
    Membre éclairé

    Homme Profil pro
    Restaurateur
    Inscrit en
    Juin 2008
    Messages
    316
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Restaurateur
    Secteur : Alimentation

    Informations forums :
    Inscription : Juin 2008
    Messages : 316
    Billets dans le blog
    1
    Par défaut
    ton exemple marche,
    c'est quand je veux l'adapter...
    j'ai pas besoin des
    if... pour declencher la msgbox..
    je voudrais que systematiquement a chaque changement, par exemple une message box "bonjour" s'affiche...

    Doit ton peut etre sepecifier le nom de l'onglet de TARGET , non..?

  6. #6
    Expert confirmé
    Avatar de Qwazerty
    Homme Profil pro
    La très haute tension :D
    Inscrit en
    Avril 2002
    Messages
    4 124
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France

    Informations professionnelles :
    Activité : La très haute tension :D
    Secteur : Service public

    Informations forums :
    Inscription : Avril 2002
    Messages : 4 124
    Par défaut
    Salut
    Je n'ai pas excel sous la main mais
    Citation Envoyé par djoumusic Voir le message
    Doit ton peut etre sepecifier le nom de l'onglet de TARGET , non..?
    Non, Target représente un objet Range (pas seulement une adresse) il est donc "accroché" a une feuille, si tu regarde dans sa structure tu y trouvera le nom de la feuille a laquelle il est associé.

    Par contre il n'en est pas de même pour [C16], je n'en mettrais pas ma main au feu, mais essai de préciser le nom de worksheet.

    A++
    Qwaz

    MagicQwaz := Harry Potter la baguette en moins
    Le monde dans lequel on vit
    Ma page perso DVP
    Dernier et Seul Tutoriel : VBA & Internet Explorer
    Dernière contribution : Lien Tableau Structuré et UserForm
    L'utilisation de l’éditeur de message

  7. #7
    Membre éclairé

    Homme Profil pro
    Restaurateur
    Inscrit en
    Juin 2008
    Messages
    316
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Restaurateur
    Secteur : Alimentation

    Informations forums :
    Inscription : Juin 2008
    Messages : 316
    Billets dans le blog
    1
    Par défaut
    OK SUPER CA MARCHE
    en fait j'avais pas remarquer qu'il fallait poser ton code sur la feuille vba
    j'etais en train de creer un module alors forcement;;;

    MILLE MERCI POUR CET INFO !!

    a bientot

  8. #8
    Membre éclairé

    Homme Profil pro
    Restaurateur
    Inscrit en
    Juin 2008
    Messages
    316
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Restaurateur
    Secteur : Alimentation

    Informations forums :
    Inscription : Juin 2008
    Messages : 316
    Billets dans le blog
    1
    Par défaut
    je pousse un peu plus mon raisonnment,

    peut on par macro, simuler le clic sur le menu deroulant d'une liste de choix,
    et avoir la petite fenetre du menu déroulant qui s'ouvre...?

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

Discussions similaires

  1. [AJAX] select menu deroulant
    Par affreuxzozo dans le forum AJAX
    Réponses: 2
    Dernier message: 27/05/2009, 14h38
  2. [XL-2003] Boite de dialogue et menu deroulant macro
    Par rhyme-k dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 23/04/2009, 16h51
  3. menu deroulant "select" valeur initiale
    Par Mo_Poly dans le forum Balisage (X)HTML et validation W3C
    Réponses: 12
    Dernier message: 15/10/2007, 21h34
  4. Menu deroulant pour plusieurs macro
    Par ekynoxx dans le forum Général VBA
    Réponses: 8
    Dernier message: 09/05/2007, 15h59
  5. affichage d'un menu deroulant apres une selection
    Par Mounr dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 27/03/2007, 20h56

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