VBA : Recherche un texte quelque soit la manière de l'écrire

Bonjour,

Je cherche à savoir s'il est possible en vba de définir lors de l'appuie sur un bouton le mot de recherche quelque soit sa façon de l'écrire.

Par exemple :

Le clic sur le userform = "Patate"

Je veux ensuite que ma variable cherche "Patate" ou "patate" ou "PATATE".

Est-ce que c'est possible ?

Merci de l'attention que vous porterez à ma question.

Cordialement,

Salut Akasha

Oui, c'est tout à fait possible en Mettant la prorpiété MatchCase à FAUX

Cells.Find(What:="patate", LookIn:=xlValues, LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False).Activate

@+

Merci de ta réponse.

Mon code se présente comme ça :

Private Sub BoutonRECY_click ()

Entrepot = "Recy"

UnloadUserform2

End Sub

Du coup comment est-ce que je suis supposer intégrer ton code ?

Re,

Il faudrait déjà commencer par nous dire ce que tu veux faire exactement

@+

J'ai un userform qui apparait pour demander le moment de la journée (matin ou après-midi)

Puis un autre pour demander le nom de l'entrepôt.

Une fois ces 2 valeurs définies, ma macro prends le relais et balaye le fichier et engage ce qu'elle doit faire (à savoir imprimer un document) à chaque fois qu'elle trouve la valeur définie en terme d'entrepôt.

Ma macro fonctionne sauf pour une chose.

Quand dans la colonne entrepôt il est inscrit "RECY" au lieu de "Recy" ou "recy" au lieu de "Recy", les valeurs ne sont pas prises en compte par ma macro car dans le userform boutonRecy le click est défini comme Entrepot = "Recy".

J'espère que j'ai réussi à me faire comprendre.

Cordialement,

Re,

Merci alors de nous joindre ton code actuel SVP ou mieux, ton fichier anonymisé

@+

Voici le fichier en pièce jointe.

https://www.mediafire.com/file/mnr7zz5twywlswa/Fichier_entrep%F4t.xlsm/file

il fait 1.5Mo du coup je ne peux pas l'héberger sur le forum.

Re,

Si j'ai bien compris, dans ton code, tu ne fais pas de la recherche à proprement parler.

Tu vérifies une correspondance, ce qui n'est pas la même chose

Dans ce cas là, il faut utiliser cette méthode

If UCase(Cells(i, 7)) = UCase(Entrepot) Then

On fait un test de correspondance sur des termes qui sont tous les deux en majuscule

@+

Je viens de tester et ça fonctionne. C'est parfait.

Merci de ton aide.