Comparaison

Bonjour , je voudrai comprarer deux cellules A1 et A2 : dans A1 j'ecris 3x et dans A2 j'ecris 6y, x et y n'etant pas des

variables je voudrai arriver à comparer A1 et A2 en affirmant que le contenu de A1 est inferieur au contenu de A2 uniquement

en examinant les coefficients 3 et 6 de 3x et 6y , comment faire cela ?

Merci pour vos réponses

Bonjour,

Un début de réponse pour la question posée :

Soit éliminer les caractères texte et conserver les données numériques (sauf é,è,à,ô,etc...)

Public Function SansTexte(c)
'Supprime texte dans cellule
    Application.Volatile
    Set obj = CreateObject("vbscript.regexp")
    obj.Global = True
    obj.Pattern = "[a-z,A-Z,_]+"
    'obj.Pattern = "\d+"
    chaine = c.Value
    chaine = obj.Replace(c, "")
    SansTexte = Trim(chaine) * 1
End Function

bonjour jean -eric

la suite evetuellement ;mais autrement

la formule est lourde

En tout cas merci à vous deux pour vos solutions au final je me rend compte que ce n'etait pas si simple !