Fonction personnalisée si avec plusieurs conditions

Fermé
azertyh Messages postés 121 Date d'inscription mercredi 18 juillet 2007 Statut Membre Dernière intervention 23 janvier 2016 - 9 nov. 2012 à 22:22
azertyh Messages postés 121 Date d'inscription mercredi 18 juillet 2007 Statut Membre Dernière intervention 23 janvier 2016 - 10 nov. 2012 à 06:44
Bonjour,

j'aimerais créer une fonction personnalisée qui a la forme suivante :

si test1 alors réponse1
si test2 alors réponse2
...
si testN alors réponseN

je connais un peu les macros mais totalement novice sur VBA. une aide pour créer cette fonction est très appréciée.

en réalité, j'aimerais avoir une fonction comme "case when" d'oracle (http://www.adp-gmbh.ch/ora/sql/case_when.html qui permet de tester plusieurs conditions et qui est facilement lisible que les "si(test;vrai;faux)" imbriquées d'excel.

merci d'avance.



1 réponse

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 713
9 nov. 2012 à 23:22
Bonjour,

Tu peux en excel coder ta fonction ainsi :

Public Function choix(cel As Range)
    Select Case cel
        Case "test1"
            choix = "réponse1"
        Case "test2"
            choix = "réponse2"
        Case Else
            choix = "erreur"
    End Select
End Function
0
azertyh Messages postés 121 Date d'inscription mercredi 18 juillet 2007 Statut Membre Dernière intervention 23 janvier 2016 21
10 nov. 2012 à 06:44
merci.
je testerai si ça me convient quand j'aurai le temps.
0