Lister les références précédentes

[Fredrennes]

Hello à tous (et bonne semaine),

Je voudrais afficher un résultat dans une cellule uniquement si une référence n'est pas retrouvée dans une autre colonne sur les lignes précédentes, comment faire ?

Facile si je fais référence uniquement à la cellule qui précède mais si je dois lister toutes les cellules au-dessus ????

Merci de votre aide.

Amicalement
Fred

 

[eric]

Bonjour,
Tu peux utiliser la méthode .find :


if Cells.Find(What:="ta référence", After:=range("taplagededonnées") , LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) is nothing then
range("tacellulederésultat")= "lerésultat"
else exit sub
end if

Pour sélectionner ta plage de recherche, tu peux faire comme ceci : on dira pour l'exemple que je souhaite sélectionner toutes les données de la colonne A, à partir de A1 et jusqu'à la ligne précédente à ma cellule active :
Range("a1", Range("a" & ActiveCell.Row - 1)).Select

J'espère que cela te conviendra

Bonne journée

 

[Fredrennes]

Merci bcp...

Cela nécessite donc le passage par une macro ......j'ai du boulot )

Bonne fin de journée

Amicalement
Fred