Mise en forme selon mise en forme

Bonjour,

J’ai écumé différents forums mais je n’arrive pas à trouver la solution à mon probleme.

J’ai un fichier de plusieurs centaines de lignes excel, avec une colonne dont les cellules sont parfois en gras.

J’aimerais faire une somme des lignes non gras, pour cela je rajoutais jusqu’à présent manuellement une apostrophe aux cellules grasses, mais cela prend vraiment du temps.

Est-il possible; grace à une macro (je suis débutant) ou autre de trier automatiquement les lignes en gras des non grasses ou un autre moyen afin de comptabiliser seulement les lignes non gras?

Merci par avance

Bonjour

Une méthode avec une colonne intermédiaire

Cordialement

18gras.xls (16.50 Ko)

Merci beaucoup c’est rapide et ca marche tres bien !

Bonjour

une autre méthode avec une fonction personnalisée

Avec une fonction personnalisée dans un module

Function SommeNonGras(Plage As Range) As Long
Application.Volatile True
Dim wCell As Range
For Each wCell In Plage
If wCell.Font.Bold = False Then
SommeNonGras = SommeNonGras + wCell.Value
End If
Next
End Function

et code de Feuille pour actualiser

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub

Cordialement

11sommenongras.zip (7.84 Ko)

Bonjour

Je préfere la 1ere méthode mais merci également !

Bonne journée


Bonjour

Je préfere la 1ere méthode mais merci également !

Bonne journée

Rechercher des sujets similaires à "mise forme"