Problème pour écrire une fonction

Résolu
Arthyss Messages postés 22 Date d'inscription   Statut Membre Dernière intervention   -  
Arthyss Messages postés 22 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

j'ai besoin de votre aide, je ne trouve pas l'erreur dans ma fonction vba :/

Public Function Escalation(Arg As Range) As String
    Dim elem As Variant
    Dim som As String
    Dim i As Integer
    
    For Each elem In Arg
        If (elem = "A") Then
            som = 0
        ElseIf (elem = "B") Then
            som = 0
        ElseIf (elem = "C") Then
            som = 1
        ElseIf (elem = "D") Then
            som = 1
        End if
    Next
    
    If (som = 0) Then
        Escalation = "Escalation 1"
    ElseIf (som = 1) Then
        Escalation = "Escalation 2"
    End If
End Function
A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

je ne trouve pas l'erreur
Laquelle, car ca marche
0
Arthyss Messages postés 22 Date d'inscription   Statut Membre Dernière intervention   5
 
J'ai dû renommer la variable "escalation" pour que ça fonctionne
0