vba // excel Résolu/Fermé

Question

Bonjour,
Bonjour,
j ai un module ou fonction comptage de couleur qui marche tres bien
Function NBC(Cible As Range, k As Integer) As Long
Dim o, i%
Application.Volatile
For Each o In Cible
If o.Interior.ColorIndex = k Then i = i + 1
Next
NBC = i
End Function
dans la feuille la formule marche impec ex =NBC(N5:N53;5)
mais je voudrais envoyer cette formule par macro ( du genre )
ActiveSheet.Cells(60, 1).Formula = "=NBC(N5:N53;5)" ou
range("A3").Formula = "=NBC(N5:N53;5)"  et la ca ne marche plus 

merci de m eclairer

eriiic · Answer

Bonjour,

Pour manipuler les formules en vba il faut respecter la syntaxe anglaise (noms de fonction en anglais et la virgule en séparateur de liste).
Donc essaie avec range("A3").Formula = "=NBC(N5:N53,5)"

eruic

charly · Answer

,  ;    mort de rire  merci vraiment car j etais a 400 km de penser a ca  . merci encore et bon week end

Vba // excel

2 réponses