macro + liste

[chinel]

Bonjour tout le monde !

voici une demande un peu spéciale, j'espère que cela est possible à faire

1) j'ai une feuille (sheets1) avec des cellules ou je rentre dedans des données
2) j'ai une deuxième feuille (sheets2) ou j'ai ma liste des données

ma première question est: est-il possible avec une macro que quand j'écris le début d'un mot la macro fini le mot par rapport à l'autre feuille ou se trouve les données (ex: j'écris Ma la macro propose Manuel D. ou Manuel M.)

ma deuxième question est: si dans le cas ou le mot ne se trouve pas dans ma liste alors une macro va ajouter celui-ci à la liste

j'espère être clair, merci de votre aide !

 

[Hulk]

Re : macro + liste

Hello,

Je ne sais pas si j'ai bien compris, mais voici une solution avec une ComboBox sur la feuille.

Cdt, Hulk.



OUPS : Ca répond à la première question... et encore 😱

 

[chinel]

Re : macro + liste

merci Hulk, mais je ne désire pas de combobox

c'est le même principe que ton modèle sauf que je voudrais bien juste mettre dans ma cellule (cell.activate) mais sans la combobox

merci quand même !!!

voir pour exemple mon fichier

 

[BOISGONTIER]

Re : macro + liste

Bonjour,

Voir PJ

JB
Formation Excel VBA JB

 

[chinel]

Re : macro + liste

Merci BOISGONTIER ! super c'est cela que je voulais, mais le petit hic c'est que dans ma feuille1 j'ai pas mal de cellules alors faire une liste déroulante (option "validation" avec la formule) cela va me prendre un temps fou !

formule à faire à chaque cellules cela me prendre du temps =DECALER(Liste;EQUIV(A10&"*";Liste;0)-1;;NB.SI(Liste;A10&"*"))
=DECALER(Liste;EQUIV(B12&"*";Liste;0)-1;;NB.SI(Liste;B12&"*"))
...
...
peut-on simplifier ?
un grand merci !!!🙂🙂🙂

 

[chinel]

Re : macro + liste

Oups ! petit oubli de ma part

j'ai des cellules qui sont fusionnées
par exemple la cellule B12 (B12: D12)

=DECALER(Liste;EQUIV(B12&"*";Liste;0)-1;;NB.SI(Liste;B12&"*"))


pardon et merci encore !!!

 

[chinel]

Re : macro + liste

j'ai testé avec plusieurs cellules mais sans résultat

=DECALER(Liste;EQUIV(B12,B14,B16,...&"*";Liste;0)-1;;NB.SI(Liste;B12,B14,B16...&"*"))

 

[job75]

Re : macro + liste

Bonsoir chinel,

Pourquoi vous cassez-vous la tête comme ça ?

La formule de validation utilise une référence relative. Il suffit de copier une cellule ayant déjà la formule et de la coller sur la cellule à renseigner par Collage spécial-Validation.

Autre solution : sélectionner (sélection multiple avec la touche Ctrl) toutes les cellules concernées et entrer la formule de validation une seule fois (la référence relative doit alors être celle de la cellule active)

Bonne nuit.

 

[chinel]

Re : macro + liste

merci de ton aide !
mais alors rien compris !!!😕

voici une partie de mon fichier

 

[BOISGONTIER]

Re : macro + liste

Bonjour,

Voir PJ

JB

 

[chinel]

Re : macro + liste

merci mais cela ne fonctionne pas dans mon classeur
message d'erreur "la source est reconnue comme éronée" bizarre!!!😕

merci de ton aide !!!

 

[chinel]

Re : macro + liste

toujours besoin d'aide svp ! 😉