Recherche:

Re,

Tu as juste à adapter le code précédent :


Range("M" & 2).EntireColumn.FormulaR1C1 = "=TODAY()"

Enfaite, à chaque fois qu'il faut que tu mette une formule dans une cellule, tu utilise...

Range("C" & 2).EntireColumn.FormulaR1C1 = "=LEN(RC[-1])"

ou


For i = 1 To Range("C" & Rows.Count).End(xlUp).Row
Range("C" & i).FormulaR1C1 = "=LEN(RC[-1])"
Next
si tu veux t’arrêter a...

L'équivalent à la fonction NB dans VBA est WorksheetFunction.CountA.

Par exemple pour obtenir le nombre de case remplie dans la colonne C on utilise

...

Le problème vient de ta fonction nb, elle fait quoi exactement? C'est toi qui l'a écrite ou tu essaie d'utiliser la formule excel NB ?

Re,

Essaie ça, on sait jamais ..



Range("C" & 2).EntireColumn.Value = nb(car)

Bonjour,

Pourquoi utiliser un For each ?

Tu peux par exemple faire la chose suivante :


For i = 1 To Range("C" & Rows.Count).End(xlUp).Row
Range("C" & i).Value = nb(car)
Next