doublons dans userforms

[philou]

bonjour à tous,

Voila j'au un problème avec les doublons dans mon userform.
Je n'arrive tout simplement à créer un liste dans une 'listbox' sans doublons. Voyez le fichier joint. De plus lorsque dans l'éxécution de mon userform, je sélectionne une ligne vide dans une listbox, j'ai le message suivant qui s'affiche' : 'erreur d'éxecution 6' ' dépassement de capacité'.

Merci à tous ceux qui veulent bien m'aider.

philou [file name=gestion clefs studio 15_20050307180411.zip size=26494]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/gestion clefs studio 15_20050307180411.zip[/file]

 

[Zon]

Salut,

quand tu écris listbox44=-1 c'est équivalent à listbox44.value alors qu'il vaudrait mieux écrire if listbox44.listindex=-1 then exit sub

A+++

 

[philou]

bonjour zon,

merci de ton aide mais malheuresement cela ne fonctionne pas
a+
philou [file name=gestion clefs studio 15_20050308153818.zip size=26494]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/gestion clefs studio 15_20050308153818.zip[/file]

 

[PascalXLD]

Bonjour

Ton dépassement de capacité vient du fait que tu as déclaré x as byte et quand ta ligne est vide tu as la valuer x=255 et ensuite tu lui ajoutes 1 soit 256 et donc ce n'est plus du byte mais de l'integer

Bon courage

 

[PascalXLD]

Re

Dis je regarde un peu ton code et je vois plusieurs fois un code du genre

Feuil4.Range('B4:B6000 ' & i)

c'est quoi ce & i

cela me parait très surprenant !!!!!!!!!!!

 

[philou]

bonjour pascal,

merci pour ton aide mais je doit te dire que je débute dans les userforms.
les codes que tu peut voir proviennent de 'celeda' de ce forum qui à eue la gentilhesse de m'aider.

Feuil4.Range('B4:B6000 ' & i)

B4: B6000 , correspond à la plage BA à B6000 de la colonne B (je pense que tu l'avait compris)
j'ai modifié cette ligne car l'ancienne de celeda ne fonctionne pas voici l'ancienne.

For Each Cell In Feuil4.Range('F4:F' & i)


pour ce qui est de & i je ne sais pas du tout a quoi cela peut servir ?

Si tu as une idée

merci pascal

 

[philou]

re pascal

je pense savoir ce que veut dire & i

derniere ligne non vide de la colonne
si tu as une idée pour mon probleme !

a+
phil

 

[philou]

re à tous

JE sais je suis un peux lourd dans mes relance pour que l'on puisse m'aider mais c'est très important pour moi car j'y travaille depuis des semaines et je suis dans l'impasse

merci a tous

phil

 

[PascalXLD]

Re

Bah oui même si ça veut dire cela ton i déjà il est pas initialisé et ensuite il ne s'utilise pas qomme cela

Sinon je n'ai pas le temps ce soir donc si personne ne s'y met j'essaierai d'y jeter un coup d'oeil demain

 

[philou]

re pascal

merci c'est gentil à toi
a+

 

[Zon]

Salut,

Philou il vaut mieux prendre certaines habitude afin d'avoir un code plus clair et que tu pourras adapter partout.

Quand on se sert plusieurs fois de la même procédure on l'écrit qu'une fois en lui passant des parametres et en le mettant dans un module standard.
Je t'ai modifié l'userform2 et adapter l'userform1.
Afin d'éviter tout problème on évite d'avoir des lignes vides dans sa base.

A+++
[file name=gestion clefs studio 15Zon_20050309060404.zip size=26705]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/gestion clefs studio 15Zon_20050309060404.zip[/file]

 

[PascalXLD]

SAlut le fil

Et bien Zon tu travailles de nuit ou quoi ??

Bon je laisse le soin à Philou de dire si ce que tu as fait lui convient

Bonne journée