Listview sur une seul ligne

[SSIAP2]

Bonsoir j'utilise cette macro

With Sheets("Commande")
  derligne = .Range("B16").End(xlUp).Row
  For lg = 1 To ListView1.ListItems.Count
    .Cells(derligne + lg, 2) = ListView1.ListItems(lg)
    .Cells(derligne + lg, 9) = ListView1.ListItems(lg).ListSubItems(1)
  Next
End With

pour envoyer les donnée de la listview vers la Feuil commande .
serais t'il possible au lieu que cela apparaise en colonne les donnée apparaise sur la meme ligne c'est a dire au lieu de

Titi Toto
Lili Lolo

sa soit

TiTi-Toto-Lili-Lolo

merci d'avance pour votre aide

 

[YANN-56]

Re : Listview sur une seul ligne

Bonsoir SSIAP2, et à ceux qui passeront par ici.

La solution serait, sans doute de faire un:

.ColumnHeaders.Count

Et sans doute oublier tes "derligne" et "lg": Pour moi lourds et inutiles!

Il y a aussi des:

Worksheets("Commande").Cells(Worksheets("Commande").Range("A65536").End(xlUp).Row + 1, 1)

qui marchent très bien.

Ainsi que des:

.ListItems(i).ListSubItems(j).Text

Si tu peux joindre un tout petit fichier chargeant ta ListView,
il sera plus facile de t'expliquer. 🙂

Amicalement

Yann

 

[SSIAP2]

Re : Listview sur une seul ligne

Bonjour yan 56 et merci de m'aider voici un fichier joint dans detail commande je souhaiterais donc que cela apparaisse en ligne si possible à bientot

 

[kjin]

Re : Listview sur une seul ligne

Bonsoir,
SSIAP2, peux tu éclaircir ta question en indiquant le résultat attendu dans le tableau...!
Yann, peux tu éclaircir ta(tes) réponse(s)...!
A+
kjin

 

[Papou-net]

Re : Listview sur une seul ligne

Bonsoir SSIAP2, Yann-56, kjin,

SSIAP,

Je retrouve là un fichier que je connais bien.

Si j'ai bien compris ta demande, voici ma solution.

Je te laisse le soin de tester (je n'ai modifié que la macro du commandbutton_click).

A +

Cordialement.

 

[YANN-56]

Re : Listview sur une seul ligne

Bonsoir SSIAP2, kjin,

Je ne vois pas le paramétrage de ta ListView, ni de son initialisation...

Le "Sub MaJListView(Ind As Byte)" n'est pas dans mon répertoire!

Je ne suis que capable de modifier un Item (x) ou SubItem (y) d'une ListView,
y compris après calculs ou reformatage éventuel, et d'en rédiger les ".Text"
dans une feuille dans le but de mise en mémoire ou d'une impression (Même sélectives)...
Et par en être Friand; plein de choses encore.

Les liaisons entre "MaJListView 1, 2,3" et tes CheckBoxes me dépassent.

Il y a certainement plus simple à explorer!
(Sauf que je découvre une façon plus efficace que la mienne pour remplir celles-ci)

Encore faudrait-il que tu élabores ton Classeur d'étude,
avec une ListView qui soit chargée de tes données.

A te lire, et amicalement.

Yann

P.S. Mot à kjiin, avec bon souvenir de nos échanges ici:
J'ai cherché à provoquer, par mes bouts de codes, SSIAP2,
pour qu'il soit un peu plus concret dans sa demande.

 

[SSIAP2]

Re : Listview sur une seul ligne

Bonjour Kjin Papou-netet Yann et merci pour votre participation

Papounet la solution que tu me propose est parfaite c'est exactement ce que je recherchais.

une petite précisions tous de même dans le début de mon poste j'ai écrit "j'utilise cette macro....."

je tiens tout de même à précisez que c'est celui que m'avais donnée déjà papounet dans un autre poste .

donc un grand merci à lui pour ces solutions à bientôt