2 Questions totalment differentes !

[Creepy]

bonjour à tous,

Me voila de retour de vacances, avec à nouveau des questions alors c'est partie :

1 - j'ai ce code :
Set C = .Find(Cherche, LookIn:=xlValues)
If Not C Is Nothing Then
FirstADdress = C.Address
Do
LstResultat.AddItem C
Set C = .FindNext(C)
Loop While Not C Is Nothing And C.Address <> FirstADdress

Donc dans ma listbox "resultat", je stocke la valeur de C qui est le resultat de ma recherche. Mais je voudrais aussi stocker les valeurs de mes 2 cellules adjacantes. Par exemple mon resultat se trouve en A6 et je veux aussi afficher B6 et C6 dans ma listbox.


2 - J'ai créé plusieurs controles differents dans ma feuille et je voudrais definir l'ordre de défilement avec la touche TAB. Dans certains j'ai la valeur Tabindex qui me permet de le gérer mais pas dans d'autres. Comment faire ??

Merci d'avance

Creepy

 

[zon]

Bonsoir à tous,




Voici une petite démo d'un listbox multicolonnes qu'on remplit grâce à un tableau....


J'espère avoir mis assez de commentaires dans le code, sinon n'hésites pas à me poser des questions.....

La méthode find est inutile dans ce cas, à mon avis...



A+++

 

[Creepy]

Salut Zon,

Merci pour ton exemple g bien compris ta métode.

Par cotre je n'arrive pas à l'adapter dans ma recherche. En effet il me faut imperativement une recherche puisque c'est la fonction de mon bouton !!

Merci d'avance


Creepy

 

[zon]

Bonjour à tous,



Désolé creepy, j'avais mal compris ta question.

Mais comme tu as ouvert un nouveau fil, pour qui ça intéresse


Donc RDV sur le Lien supprimé.


C'est une façon de faire qui je n'apprécie pas trop, tu aurais dû juste changer le titre de ce fil.....