Bonjour,
Pour contourner le "sans vba", vous pourriez demander à celui ou celle qui a développé la macro complémentaire d'y ajouter cette fonction :
Function DecompteCouleur(ByVal AireATester As Range, ByVal NumeroCouleur As Long, ByVal AvecValeur As String) As Long
Dim I As Long
DecompteCouleur = 0
For I = 1 To AireATester.Count
With AireATester(I)
If .Interior.Color = NumeroCouleur Then
Select Case AvecValeur
Case "Avec"
If .Value <> "" Then DecompteCouleur = DecompteCouleur + 1
Case "Sans"
If .Value = "" Then DecompteCouleur = DecompteCouleur + 1
Case "Tout"
DecompteCouleur = DecompteCouleur + 1
End Select
End If
End With
Next I
End Function
Ou si vous avez les droits administrateur, d'ajouter cette macro complémentaire dans :
C:\Users\XXXX\AppData\Roaming\Microsoft\AddIns ( XXXX étant votre user)
Et de la cocher dans vos compléments (Options - Compléments - Atteindre)