problème de like

Bonjour !

Je voudrais faire une comparaison d'une variable string (designation)avec une chaîne de caractères, et pour cela j'utilise like (que j'ai déjà utilisé auparavant dans mon programme et cela fonctionne).

Code:

---

1 2 3 4 5 6 7

select case designation Case designation Like "Management" Or designation Like "management" Nb_Management = Val(Workbooks(nom_FP).Worksheets("F (1)").Cells(curs_2, 28).Value) skip = True Range(Cells(curs_2, 1), Cells(curs_2, 50)).Delete Case designation Like "AQ*"

---

Voici mon code. Je sais qu'à un moment précis, à l'entrée dans le case, designation ="Management", et d'ailleur, si je selectionne

Code:

---

designation Like "Management" Or designation Like "management"

---

j'ai un petit message me disant que l'expression est vraie.

Or pdt l'execution, excel passe directement au case suivant, qui est faux, comme le reste, et finit donc sur le case else, mais ce n'est pas ce que je veux.
Une idée ?
:lol:

Bonjour,

Voir l'aide sur Select Case
Il est bien stipulé que Like n'est pas géré...

(sic)
opérateur de comparaison
Caractère ou symbole indiquant une relation entre plusieurs valeurs ou expressions. Il s'agit notamment des opérateurs inférieur à (<), inférieur ou égal à (<=), supérieur à (>), supérieur ou égal à (>=), différent de (<>) et égal (=). Les opérateurs de comparaison Is et Like peuvent également être utilisés. N'oubliez pas que les opérateurs Is et Like ne peuvent servir d'opérateurs de comparaison dans une instruction Select Case.

Bonjour,

mon idée est l'instruction Select Case n'est pas du tout respectée ‼

Exemple extrait de l'aide en ligne :

Code:

---

1 2 3 4 5 6 7 8 9 10

Select Case Number Case 1 To 5 Debug.Print "Entre 1 et 5"   Case 6 To 8 Debug.Print "Entre 6 et 8"   Case Is > 8 Debug.Print "Supérieur à 8" End Select

---

L'expression évaluée dans le Select Case n'a donc pas à être répétée dans les lignes Case …


__________________________________________________________________________________________

Merci de cliquer sur :plusser: pour chaque message ayant aidé puis sur :resolu: pour clore cette discussion …

change tes case par des if...

Bonjour,

Plutot que

Code:

---

Case designation Like "Management" Or designation Like "management"

---

Comme EngueEngue, je préconise les "if", en ajoutant ceci

Code:

---

1 2	......IF Ucase(designation) Like Ucase("management") then ........

---

Ok merci pour ces réponses rapides et claires. J'avais bien entendu essayé sans répéter le variable sur laquelle le case est effectué, mais avec le like, c'était peine perdu (en tout cas l'erreur était là bien claire ). Je n'avais pas regardé en effet dans l'aide du case, merci donc.
Je vais faire avec les if, particulièrement plébiscités, bien que mettre des elsif à la pelle ( je dois vérifier que designation soit différent de 5 chaînes de caractères différents) ne me soit pas franchement immédiate.

Merci donc, et bonne soirée.

Bonjour,
En faisant un Select Case True cela fonctionne parfaitement avec Like
Exemple

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub TestLike() Dim designation As String designation = "Ceci est un management" ' designation = "Ceci est un texte" Select Case True Case designation Like "*Management*" Or designation Like "*management*" MsgBox "management se trouve dans la chaîne " & designation Case Else MsgBox "management ne se trouve pas dans la chaîne " & designation End Select End Sub

---

Si la casse ne doit pas être sensible je travaillerais avec cette instruction UCASE(Designation) Like "*management*" comme préconisé par Dominique