Discussion :

[CmzxNene]

Bonjour à tous,

Je rencontre un problème que je n'arrive pas à résoudre malgré mes recherches sur le forum et internet.

Je souhaite faire apparaître sur chaque ligne dans une ListBox l'affichage de 4 colonnes.
J'utilise la fonction DECALER pour 1 seule colonne est cela fonctionne.
Comment faire pour faire apparaître les colonnes Heure, Nomm et Prenomm ?

Sachant que la finalité consiste à cliquer sur 1 ligne pour faire apparaître dans un autre UserForm les données complètes de cette ligne (si vous avez ce bout de code .......)


Merci de votre aide
Cdt

[CmzxNene]

Re bonjour,

Ma discussion ayant été modifiée sans que je sache pourquoi (à priori par bbil) je remets ma dernière phrase ainsi que mon fichier joint.

Vous trouverez ci-joint un fichier qui sera plus parlant.
(fichier rar supprimé sur remarque de Philippe ==> donc ne pas tenir compte de cet item))



Cordiales salutations

[Philippe Tulliez]

Bonjour,

Vous trouverez ci-joint un fichier qui sera plus parlant.

Pour toi certainement.
Plutôt que de joindre ton fichier (de plus en mode compressé rar alors que beaucoup ne savent décompresser que les zip) dès les premières discussions, il serait plus intéressant que tu expliques en bref l'organisation de ta feuille Colonne A xxx, colonne B etc .. et que tu affiches ton code (entre balises) ainsi tu aurais plus de chances de recevoir des réponses.
Pour ma part, je n'ouvre jamais les classeurs saufs en dernier recours.

[CmzxNene]

Bonjour Philippe

Bonjour,

Plutôt que de joindre ton fichier (de plus en mode compressé rar alors que beaucoup ne savent décompresser que les zip)

J'ai bien pris note de ta première remarque. Je joins donc mon exemple compressé en zip

pour la suite, il est tard chez moi et si demain je n'ai pas de réponse je suivrais ta deuxième remarque.

Salutations

[gFZT82]

Bonjour,

Une solution avec VBA.
Un double clic sur un élément de la liste fait apparaître un autre UserForm avec les données correspondant à cette ligne.

Cordialement.

[mercatog]

1. Ajoute le nombre de colonnes à ta formule DECALER

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=DECALER(Feuil1!$C$2;;;NBVAL(Feuil1!$C:$C)-1;4)

2. Adapte la propriété ColumnCount (et éventuellement ColumnWidths) de ta ListBox pour prendre en compte 4 colonnes.

Ici exemple par code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub UserForm_Initialize()
 
With Me.ListBox1
    .ColumnCount = 4
    .ColumnWidths = "3cm;1cm;2cm;2cm"
    .RowSource = "Feuil1!Test"
End With
End Sub

3. La remarque de Bill et de Philippe est à prendre avec sérieux.

[CmzxNene]

Bonjour à tous et merci plus particulièrement à gFZT82 et mercatog qui m'ont donné chacun une méthode.

Je vais pouvoir adapter celle qui me conviendra le mieux.

Je prends note des remarques de Philippe. Quant à Bill, je ne sais pas qui il est et je n'ai pas reçu de remarque de sa part.

C'est en faisant des erreurs que l'on s'améliore !

Meilleures salutations