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 d'un choix effectué dans une liste déroulante


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Décembre 2010
    Messages
    33
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2010
    Messages : 33
    Points : 30
    Points
    30
    Par défaut Selection d'un choix effectué dans une liste déroulante
    Bonjour à tous,

    Étant débutant sous excel, je me permets de vous poser le problème suivant, incapable à résoudre avec mes quelques connaissances.

    J'ai une combobox que j'alimente à l'aide du code suivant :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    With ForComboBox
    With Sheets("Base_Données").Range("C2")
    Me.ForComboBox.RowSource = Range(.Cells, .End(xlDown)(1, 1)).Address(External:=True)
    End With
    End With
    Ma question est : Quel code écrire afin d' afficher la colonne J de la donnée sélectionnée dans la combobox ? (la donnée doit être affichée dans dans label1 )

    Avez vous une idée ?

    En vous remerciant d'avance

  2. #2
    Expert éminent Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 754
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 754
    Points : 9 396
    Points
    9 396
    Par défaut
    Bonjour,

    Une solution avec Find
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim rg As Range
    Set rg = Sheets("Feuil2").Range("C:C").Find(ComboBox1.Value, lookin:=xlWhole)
    Label1.Caption = rg.Offset(0, 7).Value

Discussions similaires

  1. [AC-2003] Choix "Tous" dans une liste déroulante
    Par chris76 dans le forum IHM
    Réponses: 2
    Dernier message: 09/06/2009, 10h13
  2. Réponses: 1
    Dernier message: 01/04/2009, 19h40
  3. choix multiples dans une liste déroulante
    Par luffy2mars dans le forum Servlets/JSP
    Réponses: 5
    Dernier message: 14/01/2009, 16h34
  4. Réponses: 27
    Dernier message: 12/04/2007, 10h23
  5. vérifier qu'un choix a été effectué dans une liste déroulant
    Par karibouxe dans le forum Général JavaScript
    Réponses: 10
    Dernier message: 17/02/2006, 16h10

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