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 :

Alimentation d'une listview par les différentes valeurs d'une colonne [XL-2003]


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Homme Profil pro
    Inscrit en
    Novembre 2008
    Messages
    611
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations forums :
    Inscription : Novembre 2008
    Messages : 611
    Points : 359
    Points
    359
    Par défaut Alimentation d'une listview par les différentes valeurs d'une colonne
    Bonjour,

    Je souhaite alimenter une listview par les différentes valeurs d'une colonne d'une feuille de calcul.

    Ainsi, si j'ai:
    A
    A
    B

    Je souhaite que ma listview affiche
    A
    B

    J'ai repris le code existant dans les différents forums, par contre, je ne sais pas comment savoir si mon occurence est déjà présénte dans ma listview.

    Mon code:

    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
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    Dim Rg As Range, C As Range
     
     
     
     Set Rg = Workbooks("ab.xls").Worksheets("test").Range("E4:E" & ActiveSheet.Range("E65536").End(xlUp).Row)
     
     
     With ListView1
     
         'Définit le nombre de colonnes et Entêtes
             With .ColumnHeaders
                 'Supprime les anciens entêtes
                 .Clear
                 'Ajoute 1 colonnes en spécifiant le nom de l'entête
                 'et la largeur des colonnes
                 .Add , , "Ressources", 200
             End With
     
         'Remplissage de la 1ere colonne
         For Each C In Rg
             With .ListItems
                   .Add , , C.Value
             End With
         Next
     
     End With
     
     'Spécifie l'affichage en mode "Détails"
     ListView1.View = lvwReport
     ListView1.HideColumnHeaders = True

  2. #2
    Expert éminent sénior
    Avatar de kiki29
    Homme Profil pro
    ex Observeur CGG / Analyste prog.
    Inscrit en
    Juin 2006
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : ex Observeur CGG / Analyste prog.

    Informations forums :
    Inscription : Juin 2006
    Messages : 6 132
    Points : 11 274
    Points
    11 274

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

Discussions similaires

  1. Récupérer les valeurs d'une listview et les mettre dans des textbox
    Par ph_anrys dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 31/05/2018, 13h03
  2. [XL-2007] Lister les différentes valeurs d'une colonne
    Par laurentSc dans le forum Excel
    Réponses: 2
    Dernier message: 15/07/2013, 18h36
  3. Trouver les différentes valeurs dans une matrice
    Par cedji dans le forum Images
    Réponses: 3
    Dernier message: 24/02/2012, 18h13
  4. Réponses: 4
    Dernier message: 02/02/2009, 22h03
  5. Parcourir les différentes valeurs d'une énumération
    Par mister3957 dans le forum Général VBA
    Réponses: 4
    Dernier message: 09/03/2008, 09h07

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