OVH Cloud OVH Cloud

detecter chaine de caractere

4 réponses
Avatar
Emcy
bonjour,

existe t-il un moyen pour determiner si une chaine de caractere contient (en
vba) :
- uniquement des chiffres (virgule possible) et finissant par mF ou µF ou nF
ou pF => en gros je viens savoir lorsque ma chaine de caratere peut avior ce
genre de valeur : 100µF ou 1.2pF.

Est-ce qu'avec Like on peut faire ça ?

4 réponses

Avatar
Modeste
Bonsour® Emcy avec ferveur ;o))) vous nous disiez :

existe t-il un moyen pour determiner si une chaine de caractere contient
(en vba) :
- uniquement des chiffres (virgule possible) et finissant par mF ou µF ou
nF ou pF => en gros je viens savoir lorsque ma chaine de caratere peut
avior ce genre de valeur : 100µF ou 1.2pF.
Est-ce qu'avec Like on peut faire ça ?


oui ;o)))
pour le fun (marche même avec : quanrante-sept µF)

Sub Macro1()
If LCase(Selection) Like "*mf" _
Or LCase(Selection) Like "*nf" _
Or LCase(Selection) Like "*pf" _
Or LCase(Selection) Like "*µf" Then
valeur = Left(Selection, Len(Selection) - 2)
MsgBox "la valeur du condensateur est " _
& Chr(10) & valeur & " " & Right(Selection, 2)
Else
MsgBox Selection & Chr(10) & " n'est pas une valeur de condensateur
valide"
End If
End Sub

--
;o)))
@+

Les news à la source !!!
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :http://www.excelabo.net
http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr

Avatar
Pierre Fauconnier
Bonjour

Il y a les expressions régulières, mais je ne les maîtrise pas bien.

Tu peux utiliser ceci

If IsNumeric(Left(Chaine, Len(Chaine) - 2)) And _
(Right(Chaine, 2) = "nF" Or Right(Chaine, 2) = "pF" Or _
Right(Chaine, 2) = "µF") Then _
MsgBox "bingo" Else MsgBox "Raté"

qui teste la variable Chaine

Ok?

--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci
"Emcy" a écrit dans le message de news:

bonjour,

existe t-il un moyen pour determiner si une chaine de caractere contient
(en vba) :
- uniquement des chiffres (virgule possible) et finissant par mF ou µF ou
nF ou pF => en gros je viens savoir lorsque ma chaine de caratere peut
avior ce genre de valeur : 100µF ou 1.2pF.

Est-ce qu'avec Like on peut faire ça ?




Avatar
jps
c'est donc pas M comme modeste mais comme microfarad????
jps

"Modeste" a écrit dans le message de news:

Bonsour® Emcy avec ferveur ;o))) vous nous disiez :

existe t-il un moyen pour determiner si une chaine de caractere contient
(en vba) :
- uniquement des chiffres (virgule possible) et finissant par mF ou µF ou
nF ou pF => en gros je viens savoir lorsque ma chaine de caratere peut
avior ce genre de valeur : 100µF ou 1.2pF.
Est-ce qu'avec Like on peut faire ça ?


oui ;o)))
pour le fun (marche même avec : quanrante-sept µF)

Sub Macro1()
If LCase(Selection) Like "*mf" _
Or LCase(Selection) Like "*nf" _
Or LCase(Selection) Like "*pf" _
Or LCase(Selection) Like "*µf" Then
valeur = Left(Selection, Len(Selection) - 2)
MsgBox "la valeur du condensateur est " _
& Chr(10) & valeur & " " & Right(Selection, 2)
Else
MsgBox Selection & Chr(10) & " n'est pas une valeur de
condensateur valide"
End If
End Sub

--
;o)))
@+

Les news à la source !!!
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :http://www.excelabo.net
http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr





Avatar
Emcy
merci à tous pour vos différente propositions.

"Emcy" a écrit dans le message de news:

bonjour,

existe t-il un moyen pour determiner si une chaine de caractere contient
(en vba) :
- uniquement des chiffres (virgule possible) et finissant par mF ou µF ou
nF ou pF => en gros je viens savoir lorsque ma chaine de caratere peut
avior ce genre de valeur : 100µF ou 1.2pF.

Est-ce qu'avec Like on peut faire ça ?