Liste a choix multiple selon lordre de clic

Résolu/Fermé

salma.mh Messages postés 2 Date d'inscription vendredi 8 avril 2016 Statut Membre Dernière intervention 10 avril 2016 - 8 avril 2016 à 15:04
salma.mh Messages postés 2 Date d'inscription vendredi 8 avril 2016 Statut Membre Dernière intervention 10 avril 2016 - 10 avril 2016 à 21:39

Bonjour,
comment faire pour afficher les items choisis depuis la liste a choix multiple selon l ordred de clic.merci
jai une liste a choix multiple contenant les nom des auteurs et jveux que dans la cellule s affichent les nom selon l ordre de clic ...le macro m affiche les nom selon leurss ordre dans la liste de choix
merci

A voir également:

Liste a choix multiple selon lordre de clic
Liste déroulante de choix excel - Guide
Liste déroulante en cascade - Guide
Gertrude a préparé la liste des affaires à prendre pour l'excursion. juliette a modifié cette liste en utilisant le mode suivi des modifications proposé par le traitement de texte. - Guide
Atout clic - Télécharger - Éducatifs
Liste de diffusion whatsapp - Guide

1 réponse

Réponse 1 / 1

via55 Messages postés 14509 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 2 janvier 2025 2 739
9 avril 2016 à 19:11

Bonjour salma.mh

Code à associer à ta Listbox pour placer les résultats par exemple dans la cellule C1, séparés par des ;

Private Sub ListBox1_Change()
Range("C1") = Range("C1") & ListBox1.List(ListBox1.ListIndex) & "; "
End Sub

Cdlmnt
Via

salma.mh
10 avril 2016 à 19:02

merci bcp via55 jveux activer le userform au double clic sur tte les cellules de la colonne H
merci encore une fois

via55 Messages postés 14509 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 2 janvier 2025 2 739 > salma.mh
10 avril 2016 à 20:05

Re

Ta listbox est dans un userform ?

Pour ouvrir l'userform au double-clic en colonne H de ta feuille il faut mettre la macro suivante dans le worksheet de ta feuille
ALT+F11 pour ouvrir éditeur VBA
Double clic sur la feuille concernée dans l'arborescence
Copier-coller la macro dans la page bamche
Fermer éditeur

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 8 Then Userform1.Show
End Sub

Cdlmnt
Via

salma.mh Messages postés 2 Date d'inscription vendredi 8 avril 2016 Statut Membre Dernière intervention 10 avril 2016 > via55 Messages postés 14509 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 2 janvier 2025
10 avril 2016 à 21:39

merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii c genial
merci enormement

Discussions similaires

Clic molette qui ne marche pas

Pari multiple 2/5 explications

Tri les lettres d'un mot par ordre alphabétique

Accéder à la liste de numéros de téléphone en 07

Rechercher un numéro sur liste rouge