Est-ce que la cellule contient une certaine chaines de carac

Hello,

je cherche a demander en vba de copier une cellule (exemple: a1 to a2) si la cellule contient la chaine de caractere client

la celulle a1 va etre " GERARD CLIENT ODBC TEST ".

il me faut donc une fonction qui regarde la valeur string dans la celulle, me retourne True si elle contient CLIENT.

ensuite je peux dire, si TRUE alors A1.copy A2

MERCCIIIIII

sylv1

Bonjour

Une solution

Sub test()
  If UCase(Range("A1")) Like "*CLIENT*" Then Range("A1").Copy Range("A2")
End Sub

MERCI !