Aide pour listbox

morantinp

XLDnaute Junior
Bonjour à tous

Dans le fichier joint ma question - je ne sais pas comment faire
Merci de votre aide


[file name=fichierexemple_20060601144151.zip size=8450]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/fichierexemple_20060601144151.zip[/file] ;)
 

Pièces jointes

  • fichierexemple_20060601144151.zip
    8.3 KB · Affichages: 19

pierrejean

XLDnaute Barbatruc
bonjour morantinp

je ne suis pas sur d'avoir tout compris

vois si cela te convient [file name=fichierexemple_20060601153709.zip size=9304]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/fichierexemple_20060601153709.zip[/file]
 

Pièces jointes

  • fichierexemple_20060601153709.zip
    9.1 KB · Affichages: 17

Hervé

XLDnaute Barbatruc
Bonjour morantinp, salut pierrejean

on avais pas déjà fait un truc similaire morantip ?

en tout cas, j'ai toujours pas compris cette phrase :'Une fois ma sélection un bouton pour afficher ma sélection.'

pièce jointe une autre approche.

salut [file name=fichierexemple_20060601160816.zip size=14379]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/fichierexemple_20060601160816.zip[/file]
 

Pièces jointes

  • fichierexemple_20060601160816.zip
    14 KB · Affichages: 27

Hervé

XLDnaute Barbatruc
re

pierrejean :)

je me permet de te proposer une autre apporche pour le remplissage d'une collection à travers une boucle :



Private Sub UserForm_Initialize()
Dim data As New Collection
Dim colonne, el
Dim i As Byte, x As Byte


For Each colonne In Array(2, 3, 5)
       
For i = 2 To Cells(65536, colonne).End(xlUp).Row
               
On Error Resume Next
                data.Add Cells(i, colonne),
CStr(Cells(i, colonne))
               
On Error GoTo 0
       
Next i
       
        x = x + 1
       
       
For Each el In data
                Controls('listbox' & x).AddItem el
       
Next el
       
       
Set data = Nothing
Next colonne

End Sub



salut
 

pierrejean

XLDnaute Barbatruc
bonsoir tous

@ Hervé

merci pour ton approche qui va me permettre de faire connaissance avec

Array

et la formulation

Dim colonne, el

qui sont pour moi d'illustres inconnus

de ce pas, je titille F1 et je ne desespere toujours pas de t'arriver à la cheville d'ici quelques siecles
 

morantinp

XLDnaute Junior
Désolé du retard et merci de votre réponse, je m'excuse si je n'est pas été clair dans mon explication mais pour l'Userform c'est OK mais en plus j'aimerais que sur le tableau m'apparaise que la sélection pour l'imprimer
D'avance merci
 

Statistiques des forums

Discussions
311 725
Messages
2 081 949
Membres
101 851
dernier inscrit
vaiata