Appliquer la fonction 'Find' en VBA...

[joseph-53]

Bonsoir,

Je connais le recherchev qui à partir d'une donnée d'une cellule peut donner une foule d'info d'une base.

Mais là je bloque car je souhaite réaliser un userform....

Explications :
- Je saisis dans le textbox du userform un nom de feuil1. (ex.: Michel)
- Comment faire pour que textbox_annee puisse afficher la donnée 'Année' de feuil1. (ex.:1943)
- puis la liste des rubriques concernées :
ex. toiture
jardin
menuiserie
lecture

Il y a sans doute quelque chose avec 'Find' mais je n'arrive pas à trouver la soluce....

Quelqu'un pourrait-il me donner un coup de main s'il vous plait ? 😕

Cordialement et merci...

 

[joseph-53]

Re : Appliquer la fonction 'Find' en VBA...

Bonsoir Jean-Marcel,

Merci de ta 'première' réponse rapide.....

Je replace le fichier Excel modifié ds lequel j'ai 'personnalisé' le userform comme si j'avais saisi 'Michel' comme nom...
Tu verras la date '1943' et les champs concernés par l'activité de Michel...
Mon souhait est de donner une note à chaque champ:
Toiture
Jardin
Menuiserie
lecture
... et de sauver les donner vers une feuille excel.... (sauver les donner, çà je devrais savoir faire)

Là où je 'bloque' c'est pour ramener les données en sélectionnant un nom...

Bien cordialement et à te lire
Merci encore
Jo
PS: les rubriques peuvent aller jusqu'à 10

 

[B52]

Re : Appliquer la fonction 'Find' en VBA...

Bonsoir Jo, le forum,

je te propose une petite solution
Cordialement

 

[biloute91]

Re : Appliquer la fonction 'Find' en VBA...

bonjour Jo et B52,

ci-joint un fichier adapté d'un code avec une list view


Bonne journée

 

[joseph-53]

Re : Appliquer la fonction 'Find' en VBA...

Merci de ton intervention Biloute91,

En fait je pense avoir mal exposé mon souhait.....
Mon fichier Excel est un peu comme un fichier de notes....

On sélection 'Michel'.....

L'année de Michel apparait alors ce qui donne 1943

les rubriques de Michel apparaissent....soit :
Toiture
Jardin
Menuiserie
lecture

Cela me permet de placer un résultat pour chaque rubrique....

Exemple :

Michel 1943
Toiture 😱k
Jardin : moyen
Menuiserie : ok
lecture : passable

Merci de ton aide.

Cordialement
Jo

 

[biloute91]

Re : Appliquer la fonction 'Find' en VBA...

Bonjour Joseph,

désolé de ne pas avoir répondu plus tôt mais pas le temps avant.

Voici une autre proposition .

Bonne journée