Faire la somme des cellules avec diagonales

Bonjour,

Comme l'indique le titre de ce sujet, je cherche à faire uniquement la somme des cellules ayant des diagonales.

En cherchant, j'ai trouver comment compter ces cellules mais pas d'en faire l’addition.

Tout est écrit dans le fichier joint.

Donc si quelqu'un avait une idée pour résoudre ce problème, je suis preneur!!

merci et bonne année à tous et toutes.

Bonjour,

Dans ta fonction, remplace le + 1 par + C pour avoir la valeur de la cellule

Bonne journée

Bonjour

Ci joint ma solution

A+ François

Bonjour cousinhub,

Désolé, enfin de compte ça fonctionne, je n'avais pas débloqué le fichier qui venait d'Internet

merci à toi

Si j'ai bien compris, ça doit donner ça mais ça marche pô, j'ai un retour "#VALEUR!"

Function Plage(Diagonale As Range)
Dim C As Range
For Each C In Diagonale
If C.Borders(xlDiagonalDown).LineStyle <> xlNone Or C.Borders(xlDiagonalUp).LineStyle <> xlNone Then
Plage = Plage + C
End If
Next
End Function

Exact c'est pour ça que j'ai fait une deuxieme fonction

A+ François

Bonjour François,

Je te remercie pour ton boulot, le problème est réglé!

Je te souhaite une bonne année et plein (mais pas trop quand même) de gars comme moi avec de petits problèmes Excel!!