Certaines recherches n'aboutisses pas

J'ai besoin d'un certain nombre de variables pour la recherche, dont k qui sert à définir les cas de recherche selon les critères choisis.

Auparavant j'utilise une variable pour dimensionner l'effacement de la recherche antérieure. Inutile d'introduire une variable distincte pour cela, j'utilise une variable du type qui convient, ce qui ne l'empêche pas de servir à ce à quoi elle est destinée ensuite.

Seulement il convenait de la remettre à 0 avant réutilisation...

Ce que fait k =0 (NB- le signe : (deux-points) est un séparateur de lignes de code écrite sur la même ligne physique (de même que le _ (underline précédé d'une espace) en fin de ligne indique que la même ligne de code se continue ligne physique suivante).

Ne pas remettre k à 0 n'avait pas d'incidence pour aboutir à k=1 ou k=3, mais empêchait toute possibilité que k=2 (recherchesur Projet uniquement) [regarde la façon dont est affectée k pour comprendre pourquoi].

Ceci réglé, plus rien n'empêche que cela fonctionne !

Bonsoir,

Voilà, je pense avoir compris

J' ai rajouté ": k = 0"

If k > 13 Then .Range("A14:D" & k).ClearContents: k = 0

et j'ai modifier ceci:

If At <> "" Then k = 1
If Pr <> "" Then k = k + 2

en ceci:

If At <> "" Then k = 1
If Pr <> "" Then k = 2

et ça marche!

Un grand merci (pour la Xième fois)

Remets vite :

If Pr <> "" Then k = k + 2

Sinon cette fois, k ne peut jamais être égal à 3 !

Sinon cette fois, k ne peut jamais être égal à 3 !

Alors là, je ne suis pas!

J'ai fait les tests et je peut faire une recherche:

-uniquement par "atelier" ->

Case 1: If .Cells(i, 1) = At Then Rin = True

-uniquement par "projet" (important!) ->

Case 2: If .Cells(i, 2) = Pr Then Rin = True

-par "atelier" et ensuite choisir dans la liste des "projets" liés ->

Case 3: If .Cells(i, 1) = At And .Cells(i, 2) = Pr Then Rin = True

Alors que, si je laisse:

If Pr <> "" Then k = k +  2

la recherche uniquement par "projet" ne fonctionne pas!

Ai-je loupé une information?

Mais je présume que tu voyais ça autrement!

Le pb était qu'il fallait avant cette série faire :

k = 0

Maintenant que c'est fait :

If At <> "" Then k = 1
If Pr <> "" Then k = k +  2

Si C3 utilisé seul : k = 1

Si C6 utilisé seul : k = 2

Si C3 et C6 utilisés : k = 3

Alors que :

If At <> "" Then k = 1
If Pr <> "" Then k = 2

Si C3 utilisé seul : k = 1

Si C6 utilisé seul : k = 2

Si C3 et C6 utilisés : k = 2

Je t'accorde que c'est transparent si les numéros de projets sont toujours différents d'un atelier à l'autre, mais ta modification aboutit à ne chercher que soit atelier seul, soit projet seul.

Parfait ça passe

et à une prochaine certainement

Bonne continuation.