tester si une valeur appartient à un groupe de valeur

Le
Xavier
Bonjour à tous,
quel est le moyen le plus simple pour tester que le chiffre 45 est
présent ou non dans un groupe de chiffre (1,5,26,45,99)

du style
AE
if A in (1,5,26,45,99) then


merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel.C
Le #20080881
Bonjour.
Essaie :

Sub test()
A = 45
If IsNumeric(Application.Match(A, Array(1, 5, 26, 45, 99), 0)) Then
MsgBox "c'est dedans!"
Else
MsgBox "c'est pas dedans!"
End If
End Sub

Cordialement.
Daniel

Bonjour à tous,
quel est le moyen le plus simple pour tester que le chiffre 45 est présent ou
non dans un groupe de chiffre (1,5,26,45,99)

du style
AE
if A in (1,5,26,45,99) then


merci


Philippe.R
Le #20080871
Bonsoir,
Avec VBA :
Sub Macro1()
a = 45
rep = Evaluate("=NOT(ISNA(MATCH(" & a _
& ",{1;5;26;45;99},0)))")
If rep = True Then MsgBox "La valeur" _
& " de A est présente dans la série"
End Sub

sans VBA :
=NON(ESTNA(EQUIV(45;{1;5;26;45;99};0)))
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Xavier" news:4aa3f430$0$434$
Bonjour à tous,
quel est le moyen le plus simple pour tester que le chiffre 45 est présent
ou non dans un groupe de chiffre (1,5,26,45,99)

du style
AE
if A in (1,5,26,45,99) then


merci


Xavier
Le #20080861
Merci à tous les 2
vous êtes des chefs

Xavier


Philippe.R a écrit :
Bonsoir,
Avec VBA :
Sub Macro1()
a = 45
rep = Evaluate("=NOT(ISNA(MATCH(" & a _
& ",{1;5;26;45;99},0)))")
If rep = True Then MsgBox "La valeur" _
& " de A est présente dans la série"
End Sub

sans VBA :
=NON(ESTNA(EQUIV(45;{1;5;26;45;99};0)))


Publicité
Poster une réponse
Anonyme