Est-ce que cette fonction existe?

Bonjour,

J'aimerais savoir si cette fonction existe? ou est faisable?

J'ai un tableau de n° 1 a 10, et je voudrais faire que lorsque je clic sur le n°6 de ce tableau,

tous les n°6 de la liste apparaissent en gras, en couleur, clignote, ou autre....

tableau

1 2 3 4 5 6 7 8 9 10

liste

0 4 6 8 2 3 9 10

1 3 5 2 6 9 10 7

5 2 7 9 10 6 3 4

Merci pour vos réponse

Bonjour

Avec une macro évènementielle

Amicalement

Nad

Bonjour Nad,

Merci pour ta reponse, mais lorsque je veux ouvrir le fichier, un pavé s'affiche

me disant qu'il a été créee dans une version plus recente.

Est-il possible d'avoir le fichier dans une version plus ancienne?

Merci

Re

Tu as indiqué que tu étais sous 2007 pourtant !

Change ta version dans ton profil

Nad

Edit : fichier modifié - Optimisation du code

Re,

C'est exactement ça,

Mais je voulais selectionner plusieur n° dans ma liste de 1 à 10

Est-ce possible?

Pourrais-je avoir la marche a suivre, pour mettre en place ce tableau?

Merci

Re

Une façon de faire :

Quant à la mise en place, tu modifies les plages concernées dans le code (click droit sur le nom de l'onglet ==> visualiser le code)

Nad

Re,

Malheureusement, je ne comprend pas bien?

Je t'explique ce que je veux faire

Lors d'un tirage Loto, il y a 50 numeros, de ces 50 n° il y a 6 numeros qui sont tirés au sort.

J'ai 10, 20, ou plus de grilles de 6 numeros divers.

Lorsque je clic ces 6 numeros dans les 50 numeros, j'ai le resultat de mes grilles.

Je te joint ma fiche excel, pour mieux comprendre.

Re

Voir fichier (je t'y ai mis un petit plus ... je te laisse le découvrir

Nad

Re,

C'est SUPER!

Tu va me dire que je suis Emmerd......,

dans le fichier précédant tu m'a mis une fonction "éffacer" pourrait-on l'ajouter?

Re

Elle y est : tu cliques en AC1

Nad

re

Je l'ai trouvé, elle etait en dehors de l'ecran.

Tu va me trouver vraiment chia....,

ne peut-on pas mettre la fonction "effacer"" sur la meme page?

Merci

Re

Tu la mets où tu veux et tu modifies cette partie du code If Not Intersect(Target, Range("[b][color=#BF0000]AC1[/color][/b]")) Is Nothing Then par l'adresse de te cellule

Nad

Re,

Mille merci Nad,

je marque le poste comme résolu

Salut

Nad a écrit :

Re

Tu la mets où tu veux et tu modifies cette partie du code If Not Intersect(Target, Range("[b][color=#BF0000]AC1[/color][/b]")) Is Nothing Then par l'adresse de te cellule

Nad

Re Nad,

J'ai pu modifier la position, mais quand j'ai voulu refaire, la fenetre ne s'affiche plus?

J'ai du faire une erreur quelque part?

Re

De quelle fenêtre parles-tu ?

re

J'ai fais >>outil>>macro>>visual basic editor, là une fenetre s'ouvre, et j'ai modifié l'adresse de ma cellule, j'ai voulu refaire

et la fenetre où j'ai rectiffié, ne s'affiche plus

Re

Fais un click droit sur le nom de l'onglet et choisis "visualiser le code"

Ou, quand tu es dans VBA, clique sur le nom de ta feuille

ça marche!

Merci Nad