Fonction/Formule personnalisée sous Excel

Bonjour à tous, j'espere que vous allez bien, je suis un petit nouveau !

Voici mon probleme, je cherche a additionner des cellules appartenant a différentes plages de données les unes au dessus des autres et réparties dans le temps.

Lorsque la fonction ne trouve pas l'une des valeurs à la meme date, elle doit aller chercher la derniere valeur connue et la sommer avec les autres.

Voici une des multiples versions de mon code, la plus simple, mais la plus représentative de ce que je cherche à faire selon moi :

Function SOMMEPERSO(plage As Range)
Application.Volatile

For Each c In plage

While IsNull(c)

    Set c.Offset(0, -1) = c

Wend

Next

SOMMEPERSO = Application.WorksheetFunction.Sum(plage)

End Function

Bonjour,

une proposition

Function SOMMEPERSO(plage As Range)
Application.Volatile

For Each c In plage
ofs = 0
While c.Offset(0, ofs) = ""
 ofs = ofs - 1
Wend
 s = s + c.Offset(0, ofs)
Next

SOMMEPERSO = s

End Function

Niquel !!

Merci Acide Sulfurique

Rechercher des sujets similaires à "fonction formule personnalisee"