Sujet Précédent Sujet Suivant

Vba // excel

Résolu/Fermé
charly - 5 mars 2010 à 15:31
 charly - 5 mars 2010 à 16:02
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
A voir également:

2 réponses

Réponse 1 / 2
eriiic Messages postés 24597 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 22 septembre 2024 7 235
5 mars 2010 à 15:42
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
Réponse 2 / 2
charly
5 mars 2010 à 16:02
, ; mort de rire merci vraiment car j etais a 400 km de penser a ca . merci encore et bon week end
0