Discussion :

[LILY230]

bonjour

j'aimerai créer une boucle dans vba pour une colonne c en gros que la fontion nb(car) se répete à toute la colonne c
Utiliser avec For each

mais je sais pas comment faire
quelqu'un aurai la solution ?

merci

[Wololol]

Bonjour,

Pourquoi utiliser un For each ?

Tu peux par exemple faire la chose suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

Ce code va permettre d'aller de C1 jusqu'à la dernière cellule de C que tu as remplie et y appliquer à chaque cellule ta fonction nb(car)

Dis moi si ça ta aidé.

Bonne journée

[LILY230]

non ca ne fonctionne pas

[LILY230]

[CODE] Columns("C:C").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("C1").Select
ActiveCell.FormulaR1C1 = "Nombre caractère mot clef"
Range("C2").Select
For i = 1 To Range("C" & Rows.Count).End(xlUp).Row
Range("C" & i).Value = nb(car)

[Wololol]

Re,

Essaie ça, on sait jamais ..

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[LILY230]

il n'aime pas le nb(car)

[Transitoire]

Bonjour, sauf erreur ou omission de ma part, La formule NbCar(), ne s'utilise pas comme ça et s'écrit en VBA:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.FormulaR1C1 = "=LEN(RC[-1])"   'J'ai entré la formule NBCAR en D1 pour calculer le nombre de caractères contenu dans la chaine de caractères de la cellule C1

Quand vous ne savez pas, lancez l'enregistreur automatique de macros et faites manuellement ce que vous désirez, ensuite, arretez l'enregistrement et allez ensuite voir ce que ça donne.

Cordialement