Fonction simple avec un retour integer et animation couleur cellule
Bonjour,
j'ai créé une fonction simple qui permet d'additionner deux valeurs (entiers) (2 cellules) et de retourner un entier.
Mais j'aimerais ajouter dans cette fonction, une animation de couleur de la cellule qui possède cette fonction.
J'ai essayé en mettant une 3eme entrée "CaseResultat" (celle ci étant la cellule où j'appelle la fonction)
Mais rien ne fonctionne, même pas le retour de l'addition.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
Function perso2(Case1 As Range, Case2 As Range, CaseResultat As Range) As Integer
resultat = Case1.Value + Case2.Value
If (resultat < 5) Then
CaseResultat.Interior.Color = RGB(255, 0, 0)
End If
perso2 = resultat
End Function |
Comment dois-je procéder ?
Merci d'avance
