Find 'Strict'

[LaurentG]

Bonjour,

J'utilise dans un de mes codes la méthode 'Find' :

Set atrouve = xl.Workbooks("TEMPLATE SOP 120507.xls").ActiveSheet.Range("B:B").Find(codetest)

Admettons l'exemple suivant :
cellule B1 = ACTS123
cellule B2 = CT

Si mon codetest est égal à CT alors il va me renvoyer la cellule B1.
J'aimerais qu'il me fasse un find strict, c'est-à-dire qu'il me recherche la valeur exacte pour qu'il me renvoie la cellule B2.

Quelqu'un a-t-il une idée?
Merci

Laurent

 

[pierrejean]

Re : Find 'Strict'

bonjour LaurentG

teste:

Set atrouve = xl.Workbooks("TEMPLATE SOP 120507.xls").ActiveSheet.Range("B:B").Find(codetest,lookAt:=xlWhole)

 

[LaurentG]

Re : Find 'Strict'

Bonjour,

C'est parfait,

Merci beaucoup

Laurent