Probléme avec Fonction Like

[jemmy1989]

bonjour
dans VBA la fonction Like fonctionne quand je limite un champ compris entre 0 et 9 mais pas au delas
vous devrez comprendre dans ces exemples

Sub exemple1()
ma_variable = "5"
If ma_variable Like "[4-7]" Then ' => VRAI
MsgBox ("ok")
End If
End Sub

Sub exemple2()
ma_variable = "32"
If ma_variable Like "[30-40]" Then ' => FAUX!!
MsgBox ("ok")
End If
End Sub

c'est la méme procédure sauf les nombres qui changent

 

[Modeste geedee]

Re : Probléme avec Fonction Like

Bonsour®

Option Explicit

Sub exemple1()
Dim ma_variable
 ma_variable = "5"
MsgBox ma_variable Like "[4-7]"
 End Sub

 Sub exemple2()
 Dim ma_variable
 ma_variable = "32"
 MsgBox ma_variable Like "3#"
 End Sub

 

[CPk]

Re : Probléme avec Fonction Like

Bonjour modeste et jemmy.
Pour en rajouter une couche suivant la comparaison voulu, choisir entre # ou ?

Sub exemple2()
 Dim ma_variable
 ma_variable = "3a"
 MsgBox ma_variable Like "3#" ' renvoie faux
 End Sub

Sub exemple3()
 Dim ma_variable
 ma_variable = "3a"
 MsgBox ma_variable Like "3?" ' renvoie vrai
 End Sub

 

[youky(BJ)]

Re : Probléme avec Fonction Like

Bonjour à tous
Une proposition . . . . .

Sub exemple()
variable = "32"
MsgBox (IIf(variable > 29 And variable < 36, True, False))
End Sub

Bruno

 

[Lone-wolf]

Re : Probléme avec Fonction Like

Bonsoir Bruno, CPk, Modeste, jemmy🙂

 

[CPk]

Re : Probléme avec Fonction Like

Bonjour Bruno...CALUIRE et CALUIRE ET CUIRES ce n'est pas la même ville ?

 

[Modeste geedee]

Re : Probléme avec Fonction Like

Bonsoir Loup solitaire ...😎

 

[Lone-wolf]

Re : Probléme avec Fonction Like

Un Remix de Bruno 😉



Sub exemple()
variable = "MES FEMMES"
MsgBox (IIf(variable >2 And variable < 10, "GROS MENTEUR" 😕 , "J'AI UN DOUTE" 🙄))
End SuB

 

[youky(BJ)]

Re : Probléme avec Fonction Like

CPK,
La ville de Cuire fut rattachée à la ville de Caluire en 1790
J'ai simplement abrégé le nom de ma ville ou suis resté à cette époque.

Pour le remix de Lone-wolf
Oups! c'est un sujet trop dangereux à dévoiler sur un forum

Bonjour au passage à Modeste geedee
Bruno

 

[Lone-wolf]

Re : Probléme avec Fonction Like

Pour le remix de Lone-wolf
Oups! c'est un sujet trop dangereux à dévoiler sur un forum

Mais noooonn. Tant que c'est pris à la rigolade.

 

[jemmy1989]

Re : Probléme avec Fonction Like

Donc c'est impossible de dire

Sub exemple2()
ma_variable = "32"
If ma_variable Like "[31-39]" Then ' => vrai
MsgBox ("ok")
End If
End Sub

 

[CPk]

Re : Probléme avec Fonction Like

Bonjour, c'est possible dans le cas d'un pattern en utilisant les expressions régulières

 

[jemmy1989]

Re : Probléme avec Fonction Like

Que ce que c'est qu'un pattern?

 

[Modeste geedee]

Re : Probléme avec Fonction Like

Bonsour®
mais c'est possible de dire

Sub exemple2()
 ma_variable = "32"
If ma_variable Like "3[1-9]" Then ' => vrai
MsgBox ("ok")
 End If
 End Sub

 

[jemmy1989]

Re : Probléme avec Fonction Like

Oui ça devrait fonctionner
Je ne comprend pas pourquoi Microsoft à limiter les nombres à 1 chiffres seulement pour la fonction like