Discussion :

[ln0331]

Bonjour


je tente de remplir une combobox (zone de liste) sachant que je la remplis à partir d'une colonne qui comporte des cellules vides et des doublons.
Pour contourner le pb des cellules vides, j'ai filtré les données non vides sur cette liste et copier uniquement les cellules visibles dans une autre feuille puis ensuite j'ai pu alimenter mon combobox.

Problème : j'ai souvent le message suivant
"Erreur d'exécution 1004 : La méthode Paste de la classe Worksheet a échoué."
et selon le support Microsoft ceci apparaît lorsqu'on essaie de copier et coller par programmation des données filtrées dans un classeur.

D'après support Microsoft :

Cause

Ce problème peut se produire lorsque l'une des conditions suivantes est remplie :
•La macro Microsoft Visual Basic pour Applications (VBA) copie et colle une ligne entière dans un classeur Excel 2003.
•La macro Microsoft VBA copie et colle une plage de 2 516 lignes ou plus dans un classeur Excel 2003.

Contournement

Pour contourner ce problème si votre macro VBA copie et colle une ligne entière, modifiez le code de la macro pour copier uniquement
la section de la ligne contenant des données. Par exemple, utilisez un code de macro VBA semblable au suivant :
Range(Range("A" & ActiveCell.Row), Range("IV" & ActiveCell.Row).End(xlToLeft)).Select

Pour contourner ce problème si votre macro VBA copie et colle une plage de 2 516 lignes ou plus,
modifiez le code de la macro pour s'exécuter en boucle pour copier et coller des plages de données plus réduites
jusqu'à ce que toute la plage souhaitée soit copiée et collée.


Mais ce qu'il propose pour résoudre le pb ne m'aide pas trop (trop vague)...


Quelqu'un a-t-il déjà eu ce pb ?
ou
Est-ce qu'il existerait un moyen direct pour remplir une zone de liste sans vide et sans doublons ?


Merci d'avance.

[House MD]

Tu devrais surtout utiliser la méthode additem :

Code :

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

1
2
3
for A=1 to 10
MonCombo.additem .cells(A,2)
next A

Comme ca pas de copier coller et ca va extrèmement vite.

[ln0331]

Merci pour la réponse mais cela ne résoud pas le pb des vides et des doublons dans ma zone de liste...