1 pièce(s) jointe(s)
Problème avec ma fonction !
bonjour à tous !
j'ai modifié une petite fonction pour "concatener" des valeurs dans une seul cellule suivant 1 critère ( date) présent dans une autre cellule.
j'aimerai ajouter un autre critère présent dans une autre cellule mais là je cale.
nouveau critère : si le pourcentage est supérieur à 30 %
j'ai toujours une erreur qui m'empêche de réussir !!!
vous trouverez ci-après le code de la fonction qui fonctionne !!!
le fichier excel est joint !!!
merci de votre aide !!!
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14
| Function CONCAT_SI(R1 As Range, Rech As Range, R2 As Range)
Dim CL As Range
Dim CHN As String
For Each CL In R1
If CL.Value = Rech.Value Then
CHN = CHN & " / " & Cells(CL.Row, R2.Column).Value
End If
Next
CONCAT_SI = Trim(CHN)
End Function |