Modifier une macros

Question

Bonjour a tous!! j'ai une macros (que vous m'avez crée ici) et elle affiche 2 résultats dans la même cellule séparer par un /, Je voudrais les résultat dans deux case séparer svp. Je mets la formule en bas et j'envois un fichier si ça peut vous servir.

Un gros merci a l'avance, vous êtes vraiment des Pros!

Function lasomme2(MonRange As Range)

Application.Volatile

4test-2016.xlsm (24.83 Ko)

Dim Tablo, NBVal, I, Somme

Dim Cell

For Each Cell In MonRange

Tablo = Split(Cell.Value, "-")

For I = 0 To UBound(Tablo)

Somme = Somme + Evaluate(Tablo(I))

Next I

NBVal = NBVal + UBound(Tablo) + 1

End Function

gmb · Accepted Answer

Un essai à tester. Te convient-il ? Bye ...