Total largeur de colonne

Bonjour, Je suis assez avancé dans Excel mais je ne sais toujours pas s'il y a un moyen de connaitre le total de la largeur de plusieur colonne sans avoir à les additionner individuellement.

Exemple Je veux connaitre le total de la largeur de la colonne a, b et c.

Merci!

Personnellement je ne connais pas de façon de faire sans les additionner... Si tu veux avoir le résultat dans une variable en VBA

    For Each Colonne In Sheets("Feuil1").Columns("A:C")
        Total = Total + Colonne.ColumnWidth
    Next Colonne

pour l'avoir dans excel, une fonction perso

Public Function LargeurCol(MaRange As Range) As Integer
    Dim LargeurTotal As Integer

    For Each Colonne In MaRange.Columns
        LargeurTotal = LargeurTotal + Colonne.ColumnWidth
    Next Colonne

    LargeurCol = LargeurTotal
End Function

et "=LargeurCol(A:C)" dans la cellule où tu veux le résultat. Ça ne répond pas à ta questions mais ça peut d'aiguillonner sur une autre solution.

Merci pour la fonction person ca fonctionne bien à l'exeption que le resultat ne tiens pas compte des chiffres apres la virgule donc une colonne de 10.71 et d'une autre de 7.71 ne donnera pas 18.42 mais plutot 19.

Pouvez-vous m'aider. pour le reste ca fait l'affaire.

Merci

c'est mon erreur,

remplace les variables integer par des single

Public Function LargeurCol(MaRange As Range) As Single

    Dim LargeurTotal As Single

    For Each Colonne In MaRange.Columns
        LargeurTotal = LargeurTotal + Colonne.ColumnWidth
    Next Colonne
    LargeurCol = LargeurTotal
End Function