Re : Additionner des valeurs en fonction d'un plage donnée
Bonjour good57, phlaurent55
une solution "semi macro", une fonction personnalisée à copier dans un module standard, à utiliser comme une fonction normale.
Code:
Function HeureSupHorsFerie(Plage)
Dim Nb As Long
For Each cel In Plage
If cel.Interior.ColorIndex = -4142 And cel.Value > 8 Then Nb = Nb + cel.Value - 8
Next
HeureSupHorsFerie = Nb
End Function
en AL8 (par Ex.): insérer, fonction, personnalisées puis indiquer la plage à traiter (ici G8:AK8)
A+
Nb:
la même pour les heures sup en zones colorées:
Code:
Function HeureSupFerie(Plage)
Dim Nb As Long
For Each cel In Plage
If cel.Interior.Color <> -4142 And cel.Value > 8 Then Nb = Nb + cel.Value - 8
Next
HeureSupFerie = Nb
End Function