temps de remplissage d'un listview

  • Initiateur de la discussion Initiateur de la discussion Denis
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

D

Denis

Guest
Bonjour à tous
un petit Pb à vous exposer :
sur un USF, Un listbox "fournisseur" sur lequel quand on double-click, alimente un listview.
le premier remplissage du list view est rapide.
si je double-click un autre fournisseur (sans article celui-là) temps normal.
si je reviens à ma première sélection, le remplissage devient extrèmement long ! de plus la 2ème colonne du listview se remplit alors aléatoirement.
ci-dessous, le code de remplissage, c'est dans la boucle "for next" que le problème se trouverait

j'ai chronométré sur un stop tous les 1000 de la boucle, celà varie de 1 à 2s jusqu'à 15s

Sub RemplitLBW()
N = 0
Colonne = Me.ListBox1.List(Me.ListBox1.ListIndex, 1) + 8
Me.ListView1.ListItems.Clear

With ThisWorkbook.Sheets("Produits")
Derligne = .Range("B65536").End(xlUp).Row

For i = 2 To Derligne
If .Cells(i, Colonne) <> "" Then

Me.ListView1.ListItems.Add , , .Range("B" & i)
Me.ListView1.ListItems(N + 1).ListSubItems.Add , , i
N = N + 1
End If
Next
End With
End Sub

Désolé le fichier ne passe pas en pce (trop lourd même Zippé et nettoyé)
Merci de vos réponses
à +
Denis
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
6
Affichages
843
Réponses
4
Affichages
1 K
Réponses
1
Affichages
659
Réponses
3
Affichages
750
Réponses
2
Affichages
1 K
Retour