Discussion :

[Rogeure]

Bonsoir,

Je ne connais pas grand chose en VBA et je souhaiterai récupérer une multi sélection que j'effectue dans une listbox pour la copier dans une cellule d'une feuille Excel.

Quelqu'un(e) pourrait-il (elle) m'aider ?

Merci

[unparia]

Bonjour
Tu veux "récupérer" quoi, exactement ?
Et mettre ce "quoi" dans "une cellule" sous quelle forme, exactement ?
Je ne sais pas si tu mesures le caractère "flou" de ton exposé.
Une chose pourrait nous aider à comprendre ce que tu sembles avoir des difficultés à exposer : le code au moins tenté (c'est d'ailleurs l'une des règles de ce forum) pour parvenir à tes fins. Sa lecture nous donnera peut-être une petite idée de ce que tu cherches à obtenir.

[Rogeure]

Tu trouveras e fichier joint ma tentative :-)

Merci

[unparia]

Désolé, mais ne compte pas sur moi pour ouvrir un classeur tiers. Je ne le fais et ne le ferai jamais.
Je ne vois par ailleurs jamais la nécessité de mettre un classeur à disposition pour isoler et exposer une difficulté..
Ou tes idées sont claires et tu sais isoler la difficulté et l'exposer, accompagnée d'un copier/coller du code tenté, ou elles ne le sont pas.
A toi de voir.

[Rogeure]

Voila mon code ci-dessous et qui ne fonctionne pas comme je le souhaiterai

Code :

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

1
2
3
4
5
6
7
Private Sub CommandButton1_Click()
 
    With ListBox1
        Sheets("Feuil1").Range(Cells(1, 1), ActiveCell(.ListCount, 1)) = .List
    End With
 
End Sub

En effet, cela sélectionne toutes les données (4 au total) de ma listbox pour les copier dans 4 cellules différentes.

Ce que je souhaite, c'est ne récupérer que les données que je sélectionne (1,2,3 ou 4) et les mettre dans une seule et unique cellule sous forme de texte brut

[unparia]

- En ouvrant ton aide VBA à la rubrique Selected, propriété
, tu verras comment déterminer les éléments sélectionnés d'une listbox dont la propriété Multiselect = True.
- Dès lors que tu connais l'index X d'un article, tu en connais le contenu (Ta_Listbox.list(X))
Tu as éludé ma seconde question. -->> pour mémoire :

Et mettre ce "quoi" dans "une cellule" sous quelle forme, exactement ?