listbox

[arno44]

Bonsoir,

je suis actuellement en train de m'inspirer d'un fichier pour l'adapter à mes besoins et je rencontre des difficultés pour l'affichage du contenu de ma listbox.
La 2ème complication est que je souhaite faire un tri alphabétique dans celle-ci.

Je vous joint mon ébauche avec des explications pour que vous puissiez m'expliquer mes erreurs.

Merci d'avance

Arnaud

 

[fanfan38]

Re : listbox

Bonjour
Dans la macro box1 de l'userform tu as: Nb = Range("E2").Value
or e2 est vide...(si tu mets 10 en e2 la listbox ce remplie...)
je te conseille: nb=range("a65536").end(xlup).row
soit la dernière ligne non vide de ton tableau...
Si tu mets les données dans un autre classeur tu dois, dans cette même macro, préciser le nom du classeur
Données = Workbooks("nomclasseur").Sheets("nomfeuille").Range("B" & i + 2).Value

A+ François

 

[BOISGONTIER]

Re : listbox

Bonjour

Des exemples

JB
Formation Excel VBA JB

 

[arno44]

Re : listbox

je rencontre encore des problèmes pour la saisie dans le tableau, pour ce qui est de l'utilisation de 2 fichiers je verrais après sinon merci pour vos réponses.

 

[fanfan38]

Re : listbox

bonjour
Dans la macro commandbutton28 de l'userform1 tu utilises une variable z
Z = 6 'Ligne de départ sur la "Feuil1" => Sheets("Feuil1").Range("B" & Z).Select
Mais cette variable ne change pas...
Si tu veux ecrire à la suite il faut mettre z=range("a65536").end(xlup).row

A+ François