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 :

Combobox d'une feuille en vba excel [XL-2003]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Février 2011
    Messages
    70
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2011
    Messages : 70
    Par défaut Combobox d'une feuille en vba excel
    Bonjour,
    Tout est dans le titre.
    J'ai un combobox situé sur une feuille "Feuil1" . Je veux aller dans la feuille"Feuil2" de mon fichier aspirer les données pour alimenter la liste de mon combobox.
    Comment faire ? je n'y arrive pas.

    Je sais parfaitement comment le faire si mon combobox se trouve dans un userform.

    Mais le cas actuel, le combobox est directement dans le fichier.

    Un grand merci par avance pour votre aide.

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

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Bonjour,

    Pour alimenter une combobox en liant avec les données saisies dans une feuille

    Dans un userform
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Combobox1.RowSource = "Feuil1!A1:A10"
    Dans un onglet
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Combobox1.ListFillRange = "Feuil1!A1:A10"

    Dans les 2 cas on peut aussi utiliser la propriété AddItem

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Février 2011
    Messages
    70
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2011
    Messages : 70
    Par défaut
    d'abord pour vos propositions
    c'est quoi la propriété Additem? comment l’intégrer dans mon programme ci-dessous?
    alors j'ai voulu intengrer le code mais cela ne fonctionne. comment faire?


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub ComboBox1_Change()
     
    ComboBox1.ListFillRange = "Admin_Systemes!A1:A10"
     
    End Sub

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

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Ce n'est pas dans le bon évènement

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Private Sub UserForm_Initialize()
    Ou directement en modifiant la propriété de l'objet dans la fenêtre propriété de VBA

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Février 2011
    Messages
    70
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2011
    Messages : 70
    Par défaut
    j'ai intergré comme convenu mais cela ne fonctionne tjrs pas.
    Je vous mets mon fichier en Pièce jointe pour que vous puissiez tester par vous-même.

    cordialement
    Fichiers attachés Fichiers attachés

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

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Désolé, ma précédente réponse correspondait à un Userform

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Worksheet_Activate()
    ComboBox1.ListFillRange = "Admin_Systemes!A1:A10"
    End Sub

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

Discussions similaires

  1. Problème pour réinitialiser une feuille graphique d'excel avec VBA
    Par karatetiger76 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 18/05/2011, 22h51
  2. ajouter un combobox dans une feuille excel
    Par kariyasan dans le forum ASP.NET
    Réponses: 2
    Dernier message: 17/04/2009, 14h58
  3. Mettre la valeur d'une combobox dans une feuille Excel
    Par biche1 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 23/10/2008, 13h56
  4. Comment extraire les selections d'une combobox vers une feuille excel
    Par froggyaz dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 22/09/2008, 16h58
  5. [VBA-E] Vider une combobox sur une feuille
    Par yogyx dans le forum Macros et VBA Excel
    Réponses: 14
    Dernier message: 23/03/2007, 17h19

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