XL 2010 Application.Match

[sabagof]

Bonsoir,
apparemment assez simple avec VBA, mais je ne trouve pas. A l'aide SVP.
J'ai un tableau avec plusieurs colonnes que j'alimente avec un userform. Je veux avant d'ajouter une nouvelle ligne voir si le nr article et la réf. interne existe déjà : si oui "message" sinon ....
Merci. ci-joint un fichier...
Voici mon code qui ne marche pas...

If Not IsError(Application.Match(Txt_nr_article.Value, Sheets("article").Range("B:B"), 0)) and Not IsError(Application.Match(Txt_lot_interne.Value, Sheets("article").Range("D"), 0)) Then
MsgBox ("Cette ligne existe déjà")
Exit Sub
End If

 

[JM27]

Bonjour
Pas de userform
Fichier en XLSX et non en xlsm

 

[sabagof]

C'est vrai tu as raison, c'est un vaste programme de gestion de stock, donc j'ai juste extrait ce fichier à la recherche d'un code pour comparer 2 cellules sur la même ligne avant d'ajouter une nouvelle sans doublon. Merci

 

[job75]

Bonjour sabagof, JM27,

Peut être que dans le code du post #1 il faut remplacer And par Or

A+

 

[sabagof]

Merci bcp job75. Au fait le code marche bien avec "And" par contre avec "or" non

 

[job75]

Au fait le code marche bien avec "And" par contre avec "or" non

Ben les conditions sont différentes c'est tout mais pourquoi avoir ouvert cette discussion ?

 

[sabagof]

Ben les conditions sont différentes c'est tout mais pourquoi avoir ouvert cette discussion ?

De grâce ..... des fois la réponse viens en posant la question.... Merci quand même pour l'intérêt....
A+