Il n'est pas nécessaire de renseigner les formules manuellement.
Tu peux renseigner C80, tirer la formule sur C80:C91 puis copier la plage C80:C91 et coller cette plage sur E80:E91, G80:G91, etc jusqu'à CY80:CY91.
Par contre, pour prendre en compte le cas où la cellule du n° cablage est vide, tu devra adapter la fonction :
Function NombreCablage(Cel As Range) As Variant
Dim Plage As Range
Application.Volatile
Set Plage = Cells(3, Cel.Column).Resize(75)
If Cel <> "" Then
NombreCablage = Application.CountIf(Plage, "*" & Cel.Value & "*")
Else
NombreCablage = ""
End If
End Function
A+