VBA Recherche

Re : VBA Recherche

Bonjour,

Si Si... (pas l'impératrice, hein) repasse par ici, il rectifiera Si... besoin!?

Il faut d'abord t'arranger pour que la corbeille apparaisse en colonne V. Tu te souviens que Si... a masqué 2 lignes (qui sont reproduites dans la procédure Worksheet_Change)? Commence donc par afficher ces 2 lignes (8 et 9) et déplace la corbeille en colonne V (en fusionnant V8 et V9 au passage, puisque tu aimes ça). J'en profite pour confirmer que le 3 est bien la valeur figurant dans la cellule ... elle apparaît sous forme de corbeille parce que la police utilisée est la "Wingdings 2". Masque ensuite à nouveau les deux lignes.

Dans la Sub Worksheet_Change il faut donc copier la plage B8:V9 au lieu de B8:J9 (en ligne 11 dans le code)

Reste enfin à tester dans l'événement Worksheet_SelectionChange, si c'est bien en colonne V qu'a lieu la sélection. Écris donc

If R.Column = 22 And R(1, 1) = 3 Then ...

Cliquez pour agrandir...

Re : VBA Recherche

Re

un "poil" (voire une barbe) plus lent que Modeste 😀 que je remercie d'apporter un SAV,

dans If R.Column =10 And R(1, 1) = 3 Then

- le 3 est bien le caractère spécial "corbeille"

- R(1,1), peu souvent utilisé mais pourtant très pratique, désigne la première cellule de la sélection (fusion oblige)

- Le 10 est le numéro de la colonne J donc pour V prendre 22

Remarque : =Colonne() permet de retrouver le numéro de la colonne sans compter sur les doigts !

Re : VBA Recherche

C'est bien ce que j'avais compris, il me reste un peu de neurone !!!😉
Mais l'action sur la corbeille n'a plus d'effet, et en prime la colonne J ne s'affiche pas (un détail).

Voila encore mes problèmes.🙁

Re : VBA Recherche

salut

dernier essai (trop de changements successifs).

Re : VBA Recherche

Merci à vous tous, comment faire pour clore le sujet ?