Vba // excel

Résolu
charly -  
 charly -
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
Configuration: Windows XP / Firefox 3.6

2 réponses

  1.
    eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    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
    0
  2. charly
     
    , ; mort de rire merci vraiment car j etais a 400 km de penser a ca . merci encore et bon week end
    0