Ajout d'une formule par code vba

Bonjour,

Tout d'abor, merci à toutes les personnes qui m'ont aidées depuis mon inscription. Grâce à leur patience et leurs conseils, j'ai compris les basiques et suis aujourd'hui à même d'écrire mes propres boucles... qui marchent !
Allons aux faits : Vous qui êtes des pros de la programmation, vous arrive t-il dans vos macros d'insérer une formule Excel "classique. Pour mieux me faire comprendre, je vais illustrer avec un problème (qui n'en est pas un) auquel je suis confronté. Le début de ma macro est constituée de boucles afin de supprimer les lignes inutiles et structurer les données afin qu'elles soient exploitables par la suite. J'arrive au moment ou sur une colonne, je dois supprimer les espaces inutiles. D'où ma question, est-ce idiot de simplement écrire

Code:

---

Cells(10,2).Formula = "=TRIM(RC[-7])"

---

puis faier un Autofill ou bien est-ce que vous lui préférez un For Each Range In avec Next ?
Pour info, j'ai lu la belle phrase de Mr Fauconnier mais là ma question est légèrement différente car nous sommes déja dans de la programmation en VB.

Merci !

Runsh

Bonsoir
3 propositions, je préfère la dernière (gain de temps)
1. Boucle

Code:

---

1 2 3 4 5

Dim i As Integer   For i = 2 To 100 Range("J" & i).FormulaR1C1 = "=TRIM(RC[-7])" Next i

---

2. Autofill

Code:

---

1 2	Range("J2").FormulaR1C1 = "=TRIM(RC[-7])" Range("J2").AutoFill Range("J2:J100")

---

3. Directement

Code:

---

1 2	Range("J2:J100").FormulaR1C1 = "=TRIM(RC[-7])"

---

Bonjour Mercatog,

Merci pour toutes tes solutions. J'étais parti sur la première puis ai basculé sur ta dernière solution, suivant ton conseil. C'est en effet plus rapide.
Merci d'avoir pris le temps de poster tes façons de faire.

Bonne journée !

Runsh