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 :

Objet ComboBox & OLEObject


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Novembre 2007
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : Novembre 2007
    Messages : 30
    Par défaut Objet ComboBox & OLEObject
    Bonjour,
    Je souhaiterais utiliser la propriété list de l'objet ComboBox pour la charger à partir d'un array.
    Mon souci est que j'arrives bien à récupérer la combo via
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
        With ActiveWorkbook.Sheets(feuilleExcelCombo).OLEObjects(comboBoxName).Object
        End With
    mais qu'il ne me propose pas la propriété list. Il faudrait convertir cet objet OleObjet en ComboBox mais je ne vois pas trop.
    Pour info, le chargement de ma combo est localisé dans un module externe, d'ou les variables : feuilleExcelCombo et comboBoxName.

    Merci pour votre aide.

  2. #2
    Membre chevronné

    Profil pro
    Inscrit en
    Octobre 2004
    Messages
    453
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2004
    Messages : 453
    Par défaut
    Tu pourrais essayer de préciser au compilateur le type d'objet que tu veux par :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Dim cboLeCombo As ComboBox
     
    ...
     
    Set cboLeCombo = ActiveWorkbook.Sheets(feuilleExcelCombo).OLEObjects(comboBoxName).Object
    avant d'accéder aux membres de ComboBox.

  3. #3
    Expert confirmé

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Par défaut
    bonsoir

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    Dim Obj As OLEObject
    Dim Tableau As Variant
     
    Tableau = Range("A1:A10")
     
    Set Obj = Worksheets("Feuil1").OLEObjects("ComboBox1")
    Obj.Object.List() = Tableau


    bonne soirée
    michel

  4. #4
    Membre averti
    Inscrit en
    Novembre 2007
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : Novembre 2007
    Messages : 30
    Par défaut
    Merci à tous les 2.

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

Discussions similaires

  1. Réponses: 2
    Dernier message: 23/04/2012, 10h46
  2. [Débutant] liaison base de donnée avec objets (combobox, textbox, etc.)
    Par bougyfab dans le forum VB.NET
    Réponses: 22
    Dernier message: 13/09/2011, 11h48
  3. Réponses: 1
    Dernier message: 15/07/2011, 15h17
  4. comboBox objets metiers datagridview
    Par pdesoil dans le forum C#
    Réponses: 16
    Dernier message: 28/08/2007, 09h55

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